anchor.diff:  	    LocalSvcAddresses = 
   		ets:foldl(fun(#service_entry { network_address = LocalAddress }, Acc) -> 
   				  [ LocalAddress | Acc ] end, 
  -			  [], ?LOCAL_SERVICE_TABLE),
  +			  [], ?LOCAL_SERVICE_TABLE)
   
   	    %% Call service edge with local addresses (sorted and de-duped) and
   	    %% the services to register.
  -	    rvi_common:send_component_request(service_edge, register_remote_services, 
  -					      [
  -					       { local_service_addresses, lists:usort(LocalSvcAddresses)}, 
  -					       { services, Services}				       
  -					      ])
  +	    %% rvi_common:send_component_request(service_edge, register_remote_services, 
  +	    %% 				      [
  +	    %% 				       { local_service_addresses, lists:usort(LocalSvcAddresses)}, 
  +	    %% 				       { services, Services}				       
  +	    %% 				      ])
       end,
   
       {ok, [ { status, rvi_common:json_rpc_status(ok) } ]}.
  
positive.code: 	    LocalSvcAddresses = 
  		ets:foldl(fun(#service_entry { network_address = LocalAddress }, Acc) -> 
  				  [ LocalAddress | Acc ] end, 
  			  [], ?LOCAL_SERVICE_TABLE),
  
  	    %% Call service edge with local addresses (sorted and de-duped) and
  	    %% the services to register.
  	    rvi_common:send_component_request(service_edge, unregister_remote_services, 
  					      [
  					       { local_service_addresses, lists:usort(LocalSvcAddresses)}, 
  					       { services, SvcNames}				       
  					      ])
      end,
  
      {ok, [ { status, rvi_common:json_rpc_status(ok)}]}.
  
negative.code:     
      %% Call service edge with local addresses (sorted and de-duped) and
      %% the services to register.
      %% rvi_common:send_component_request(service_edge, unregister_remote_services, 
      %% 				      [
      %% 				       { local_service_addresses, lists:usort(LocalSvcAddresses)}, 
      %% 				       { services, [Service]}				       
      %% 				      ]),
  
      ok.
  
  