summaryrefslogtreecommitdiff
path: root/src/Erebos
diff options
context:
space:
mode:
Diffstat (limited to 'src/Erebos')
-rw-r--r--src/Erebos/Discovery.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Erebos/Discovery.hs b/src/Erebos/Discovery.hs
index 43350c5..6e39b8c 100644
--- a/src/Erebos/Discovery.hs
+++ b/src/Erebos/Discovery.hs
@@ -682,7 +682,7 @@ receiveFromTunnel server taddr = do
receivedFromCustomAddress server taddr stpData
receiveFromTunnel server taddr
StreamClosed {} -> do
- return ()
+ dropPeerAddress server $ CustomPeerAddress taddr
discoverySetupTunnel :: Peer -> RefDigest -> IO ()