anchor.diff:  -spec make_response(pid(), binary(), binary()) -> json().
   make_response(FromPid, Xnest, {Type, Msg}) ->
   	Time = time2binary(erlang:localtime()),
  -	From = list_to_binary(pid_to_list(FromPid)),
  +	From = pid2binary(FromPid),
   	Frame = [ {<<"from">>, From}
   		,{<<"xnest">>, Xnest}
   		,{<<"type">>, Type}
  
positive.code: 		,{<<"send_time">>, Time}
  	],
  	Response = jsx:encode(Frame),
  %lager:info("~p", [Response]),
  	Response.
  
  %% @doc time to binary
  
negative.code: %% @doc Receive Message from client and send it to XNest
  websocket_handle({text, Msg}, Req, State ) ->
  	XNestPid = State#state.xnest_pid,
  lager:info("some one send a message:~ts", [Msg]),
  	xnest:input(XNestPid, {self(), text, {'normal', Msg}}),			%% Use xnest API to send message
  	{ok, Req, State};
  
  