diff options
| -rw-r--r-- | src/Erebos/Discovery.hs | 3 |
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 |