anchor.diff:  
   
   process_announce(FromPid, RemoteBTAddr, RemoteChannel,
  -		 TransactionID, available, Services,
  +		 TransactionID, "available", { array, Services},
   		 Signature, CompSpec) ->
       ?debug("dlink_bt:service_announce(available): Address:       ~p-~p", [ RemoteBTAddr, RemoteChannel ]),
       ?debug("dlink_bt:service_announce(available): TransactionID: ~p", [ TransactionID ]),
       ?debug("dlink_bt:service_announce(available): Signature:     ~p", [ Signature ]),
       ?debug("dlink_bt:service_announce(available): Service:       ~p", [ Services ]),
   
  -
       %% Register the received services with all relevant components
  -
       add_services(Services, FromPid),
  -
       service_discovery_rpc:register_services(CompSpec, Services, ?MODULE),
       ok;
   
  
positive.code: 
  
      %% Delete from our own tables.
  
      delete_services(FromPid, Services),
      service_discovery_rpc:unregister_services(CompSpec, Services, ?MODULE),
      ok.
  
negative.code:     {ok,[{address, Address }]} = bt_drv:local_info([address]),
  
      bt_connection:send(FromPid, 
  		       term_to_json(
  			 {struct, 		     
  			  [ { "tid", 1 },
  			    { "cmd", "authorize" },
  			    { "addr", bt_address_to_string(Address) },
  			    { "chan",  SetupChannel },
  			    { "rvi_proto", "rvi_json" },
  			    { "certificate", "" },
  			    { "signature", "" } ]})),
      ok;
  
  
  