anchor.diff:  
   %% ------------------------------------------------------------------
   
  -service_control_channel(#envelope{type = Type, id = Id, contents = {struct, Request}}, State) ->
  -	service_control_message(Type, Id, Request, State);
  +service_control_channel(#envelope{type = Type, id = MessageID, contents = {struct, Request}}, State) ->
  +	service_control_message(Type, MessageID, Request, State);
   
   service_control_channel(Thing, State) ->
   	?warning("Unhandled input:  ~p", [Thing]),
  
positive.code: 
  %% ------------------------------------------------------------------
  
  service_control_message(request, <<"login">>, Id, Request, State) ->
  	?info("starting authentication"),
  	?info("Request: ~p", [Request]),
  	% Check with authentication backends
  
negative.code: 			% TODO: Replace this with generated character list
  			{characters, [<<"Character 1">>, <<"Character 2">>, <<"Character 3">>]}
  	]},
  	respond(ssl, MessageID, <<"control">>, GetCharsRep),
  	State;
  
  service_control_message(request, <<"selectCharacter">>, MessageID, Request, State) ->
  	Character = proplists:get_value(<<"character">>, Request),
  	?info("Character selected: ~p", [Character]),
  
  