summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--components/dlink_bt/src/dlink_bt_rpc.erl10
1 files changed, 9 insertions, 1 deletions
diff --git a/components/dlink_bt/src/dlink_bt_rpc.erl b/components/dlink_bt/src/dlink_bt_rpc.erl
index 40cadb8..646a72b 100644
--- a/components/dlink_bt/src/dlink_bt_rpc.erl
+++ b/components/dlink_bt/src/dlink_bt_rpc.erl
@@ -477,6 +477,7 @@ handle_socket(FromPid, SetupBTAddr, SetupChannel, closed, CompSpec) ->
%% Get all service records associated with the given connection
LostSvcNameList = get_services_by_connection(FromPid),
+ ?info("Will delete services ~n", [ LostSvcNameList]),
delete_connection(FromPid),
@@ -485,11 +486,18 @@ handle_socket(FromPid, SetupBTAddr, SetupChannel, closed, CompSpec) ->
fun(SvcName) ->
case get_connections_by_service(SvcName) of
[] ->
+ ?info("correct"),
service_discovery_rpc:
unregister_services(CompSpec,
[SvcName],
?MODULE);
- _ -> ok
+ _ ->
+ ?info("correct"),
+ service_discovery_rpc:
+ unregister_services(CompSpec,
+ [SvcName],
+ ?MODULE)
+
end
end, LostSvcNameList),