anchor.diff:      ?debug("    service_edge_rpc:local_msg: parameters:      ~p", [Parameters]),
       ?debug("    service_edge_rpc:local_msg: calling_service: ~p", [CallingService]),
   
  -    case 
  +    
  +    case 
  +	%%
  +	%% Authorize local message and retrieve a certificate / signature
  +	%% that will be accepted by the receiving node that will deliver
  +	%% the messaage to its locally connected target service.
  +	%%
   	rvi_common:send_component_request(authorize, authorize_local_message,
   					  [
   					   {calling_service, CallingService}, 
  
positive.code: 					   {signature, Signature}
  					  ]) of
  	{ ok, ok, _AuthJSON } -> 
  	    case 
  		rvi_common:send_component_request(service_discovery, 
  						  resolve_service,
  						  [ { service, Target } ],
  						  [ network_address ]) of
  		{ ok, ok, [ NetworkAddress], _SDJSON } -> 
  		    forward_message_to_local_service(NetworkAddress, Target, Parameters);
  
  		%% service discovery failed.
  		_ -> { error, { unknown_target, Target}}
  	    end;
  
  	%% Authorization failed.
  	{ ok, Err, _} ->
  	    {error, { authorization, Err }};
  
  	%% Authorization component error (HTTP, or similar).
  	Err -> Err
      end.
  
  forward_message_to_local_service(NetworkAddress, Service, Parameters) ->
      %%
      %% Strip our node prefix from target so that
      %% the service receiving the JSON rpc call will have
      %% a target that is identical to the service name
      %% it registered with.
      %%%
      SvcName = string:substr(Service, 
  			    length(rvi_common:local_service_prefix())),
  
      %% Deliver the message to the local service
      case rvi_common:get_request_result(
  	   rvi_common:send_http_request(NetworkAddress, 
  					"message", 
  					[ { target, SvcName },
  					  { parameters, Parameters }])) of
  
  	%% Request delivered.
  	{ ok, ok, _ } ->
  	    { ok, [ { status, rvi_common:json_rpc_status(ok)} ] };
  
  	%% Request delivered (with no status reply)
  	{ok,  undefined  } ->
  	    { ok, [ { status, rvi_common:json_rpc_status(ok)} ] };
  
  	%% status returned was an error code.
  	{ ok, Status, _ } ->
  	    { error, { json_rpc, rvi_common:json_rpc_status(Status)}};
  
  	%% HTTP or similar error.
  	Err ->
  	    Err
      end.
  
  %% JSON-RPC entry point
  %% Called by local exo http server
  
negative.code:     ?debug("    service_edge_rpc:register_service(): address: ~p ", [Address]),
  
      case 
  	%% Register the service at service discovery
  	rvi_common:send_component_request(service_discovery, register_local_service,
  					  [
  					   {service, Service}, 
  					   {network_address, Address}
  					  ], [service]) of
  	{ ok, JSONStatus, [ FullSvcName], _JSON} -> 
  	    
  	    %% Announce the new service
  	    rvi_common:send_component_request(data_link, announce_new_local_service,
  					      [
  					       %% Convert /some/svc to jlr.com/some/svc
  					       {service, rvi_common:local_service_to_string(Service)}
  					      ], [service]),
  	    { ok, [ {service, FullSvcName}, 
  		    {status, rvi_common:json_rpc_status(JSONStatus)} ] };
  
  