summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2025-03-26 20:38:03 +0100
committerRoman Smrž <roman.smrz@seznam.cz>2025-03-27 20:21:08 +0100
commite3372f86d6935454b38c738784f9e2de8ac0a844 (patch)
treeab08f850184be0a0f629f01a7f08df422f84513e
parented93546c519b35d5ece89c1fece94d8347e26f28 (diff)
Discovery: do not announce self without any local address
-rw-r--r--src/Erebos/Discovery.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Erebos/Discovery.hs b/src/Erebos/Discovery.hs
index f97c792..15ac9c4 100644
--- a/src/Erebos/Discovery.hs
+++ b/src/Erebos/Discovery.hs
@@ -352,4 +352,5 @@ instance Service DiscoveryService where
#endif
]
- sendToPeer peer $ DiscoverySelf addrs Nothing
+ when (not $ null addrs) $ do
+ sendToPeer peer $ DiscoverySelf addrs Nothing