anchor.diff:  websocket_handle(_Data, Req, State) ->
   	{ok, Req, State}.
   
  +
  +%% @private
  +%% @doc Receive Message from self 
  +websocket_info({members}, Req, State) ->
  +	XNestPid = State#state.xnest_pid,
  +	{ok, Count} = xnest:status(XNestPid, client_counts),
  +	ResponseMsg = make_response(self(), State#state.xnest_name, {member_count, Count}),
  +	{reply, {text, ResponseMsg}, Req, State};
   
   %% @private
   %% @doc Receive Message from xnest and send it to client
  
positive.code: join_xnest(XNestName) ->
  	{ok, XNestPid} = xnest_manager:get_xnest(XNestName),   %% I can know what format will be return by xnest_manager
  	{ok, JoinResult} = xnest:join(XNestPid, self()),
  	xnest:input(XNestPid, {self(), text, JoinResult}),			%% Use xnest API to send join message
  	{ok, XNestPid}.
  
  
  %% @doc generate response 
  -spec make_response(pid(), binary(), binary()) -> json().
  make_response(FromPid, Xnest, Msg) ->
  	Time = time2binary(erlang:localtime()),
  	From = list_to_binary(pid_to_list(FromPid)),
  	Msg_ = [ {<<"from">>, From}
  		,{<<"xnest">>, Xnest}
  		,{<<"payload">>, Msg}
  		,{<<"send_time">>, Time}
  	],
  	Response = jsx:encode(Msg_),
  %lager:info("~p", [Response]),
  	Response.
  
  
negative.code: 	I_ = integer_to_binary(I),
  	S_ = integer_to_binary(S),
  	<<Y_/binary, "-", M_/binary, "-", D_/binary, " ", H_/binary, ":", I_/binary, ":", S_/binary>>.
  
  