diff options
Diffstat (limited to 'src/Network/Tox/DHT')
-rw-r--r-- | src/Network/Tox/DHT/Handlers.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/Tox/DHT/Handlers.hs b/src/Network/Tox/DHT/Handlers.hs index 57fc1d57..6a80b4a4 100644 --- a/src/Network/Tox/DHT/Handlers.hs +++ b/src/Network/Tox/DHT/Handlers.hs | |||
@@ -414,7 +414,7 @@ getNodes client cbvar nid addr = do | |||
414 | 414 | ||
415 | updateRouting :: Client -> Routing -> OnionRouter -> NodeInfo -> Message -> IO () | 415 | updateRouting :: Client -> Routing -> OnionRouter -> NodeInfo -> Message -> IO () |
416 | updateRouting client routing orouter naddr msg | 416 | updateRouting client routing orouter naddr msg |
417 | | PacketKind 0x21 <- msgType msg = hPutStrLn stderr "(tox)updateRouting: ignoring lan discovery" -- ignore lan discovery | 417 | | PacketKind 0x21 <- msgType msg = dput XLan "(tox)updateRouting: ignoring lan discovery" -- ignore lan discovery |
418 | | otherwise = do | 418 | | otherwise = do |
419 | atomically $ do | 419 | atomically $ do |
420 | m <- HashMap.lookup (nodeId naddr) <$> readTVar (nodesOfInterest routing) | 420 | m <- HashMap.lookup (nodeId naddr) <$> readTVar (nodesOfInterest routing) |