anchor.diff:  client_login_hook(undefined, ClientRecord) ->
   	?debug("Client ~p logged in; registering 'ping' channel.", [ClientRecord]),
   	#client_info{channel_manager = ChannelManager} = ClientRecord,
  -	pre_client_channels:set_sup_channel(ChannelManager, ?CHANNEL, ?MODULE, []),
  +	pre_client_channels:set_channel(ChannelManager, ?CHANNEL, ?MODULE, []),
   	{ok, undefined}.
  
positive.code: 		{timestamp, Timestamp}
  	]},
  	pre_client_connection:send(Connection, tcp, {response, Id}, ?CHANNEL, PingResponse),
  	ok;
  
  client_request(RequestType, Client, Id, Request, _Info) ->
  	?debug("Ping channel received unrecognized ~p request! (~p, ~p, ~p)", [RequestType, Client, Id, Request]),
  	ok.
  
  client_response(Client, Id, Response, _Info) ->
  	?debug("Ping channel received unrecognized response! (~p, ~p, ~p)", [Client, Id, Response]),
  	ok.
  
  client_event(Client, Event, _Info) ->
  	?debug("Ping channel received unrecognized event! (~p, ~p)", [Client, Event]),
  	ok.
  
  %% -------------------------------------------------------------------
  
  
negative.code: 	client_request(request_type(Request), Client, Id, Request, Info).
  
  client_request(<<"ping">>, Client, Id, _Request, _Info) ->
  	#client_info{connection = Connection} = Client,
  	{MegaSecs, Secs, MicroSecs} = now(),
  	Timestamp = MegaSecs * 1000000 + Secs + MicroSecs / 1000000,
  