From 1d369211c876b903ffec756a90050e0587136e54 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Mon, 7 Jul 2025 20:55:28 +0200
Subject: Do not print note about unsuccessful discovery search

---
 src/Erebos/Discovery.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/Erebos/Discovery.hs b/src/Erebos/Discovery.hs
index d098f98..ef289cb 100644
--- a/src/Erebos/Discovery.hs
+++ b/src/Erebos/Discovery.hs
@@ -244,8 +244,9 @@ instance Service DiscoveryService where
             dpeer <- M.lookup (refDigest ref) . dgsPeers <$> svcGetGlobal
             replyPacket $ DiscoveryResult ref $ maybe [] dpAddress dpeer
 
-        DiscoveryResult ref [] -> do
-            svcPrint $ "Discovery: " ++ show (refDigest ref) ++ " not found"
+        DiscoveryResult _ [] -> do
+            -- not found
+            return ()
 
         DiscoveryResult ref addrs -> do
             let dgst = refDigest ref
-- 
cgit v1.2.3