anchor.diff:  					 { rvi, register_local_service, 
   					   [ SvcName, URL]}),
   
  -    {ok, [ {status, rvi_common:json_rpc_status(ok) }, { service, FullSvcName }]};
  +    {ok, [ {status, rvi_common:json_rpc_status(ok) }, 
  +	   { service, FullSvcName },
  +	   { method, "register_service"} 
  +	 ]};
   
   
   handle_rpc("unregister_service", Args) ->
       {ok, SvcName} = rvi_common:get_json_element(["service"], Args),
       gen_server:call(?SERVER, { rvi, unregister_local_service, [ SvcName]}),
  -    {ok, [ { status, rvi_common:json_rpc_status(ok) }]};
  +    {ok, [ { status, rvi_common:json_rpc_status(ok) },
  +	   { method, "unregister_service"} 
  +	 ]};
   
   
   handle_rpc("get_available_services", _Args) ->
       [ Status, Services ] = gen_server:call(?SERVER, { rvi, get_available_services, []}),
       ?debug("get_available_services(): ~p ~p", [ Status, Services ]),
       {ok, [ { status, rvi_common:json_rpc_status(ok)},
  -	   { services, {array, Services}} ]};
  +	   { services, {array, Services}},
  +	   { method, "get_available_services"} 
  +	 ]};
   
   
   handle_rpc("message", Args) ->
  
positive.code:     ?debug("service_edge_rpc:websocket_get_available()"),
      [ Services ] = gen_server:call(?SERVER, { rvi, get_available_services, []}),
      { ok, [ { status, rvi_common:json_rpc_status(ok)},
  	    { services, Services}] }.
  
  
  %% Invoked by locally connected services.
  
negative.code: 					      [ SvcName, Timeout, Parameters]}),
  
      {ok, [ { status, rvi_common:json_rpc_status(Res) },
  	   { transaction_id, TID },
  	   { method, "message"} 
  	 ]};
  
  handle_rpc(Other, _Args) ->
      ?warning("service_edge_rpc:handle_rpc(~p): unknown command", [ Other ]),
  