From 379bbf574ad0c82c36a6e7966a8fd736d7d29ef4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Sat, 3 Oct 2026 11:31:29 +0200
Subject: Discovery: avoid requesting search from peers with incomplete
 identity

---
 src/Erebos/Network.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Erebos/Network.hs')

diff --git a/src/Erebos/Network.hs b/src/Erebos/Network.hs
index 225ba4a..3cb961d 100644
--- a/src/Erebos/Network.hs
+++ b/src/Erebos/Network.hs
@@ -1116,7 +1116,7 @@ runPeerServiceOn mbservice newStreams paddr peer handler = liftIO $ do
                                             putTMVar (serverServiceStates server) $ M.insert svc (SomeServiceGlobalState proxy gs') global
                                         return h'
                 _ -> do
-                    atomically $ logd $ "can't run service handler on peer with incomplete identity " ++ show paddr
+                    atomically $ logd $ "can't run service " <> show (toUUID svc) <> " handler on peer with incomplete identity " ++ show paddr
 
         _ -> atomically $ do
             logd $ "unhandled service '" ++ show (toUUID svc) ++ "'"
-- 
cgit v1.2.3