diff options
Diffstat (limited to 'dht/src/Network/Tox/Onion/Routes.hs')
-rw-r--r-- | dht/src/Network/Tox/Onion/Routes.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dht/src/Network/Tox/Onion/Routes.hs b/dht/src/Network/Tox/Onion/Routes.hs index 2f13a513..374b9648 100644 --- a/dht/src/Network/Tox/Onion/Routes.hs +++ b/dht/src/Network/Tox/Onion/Routes.hs | |||
@@ -276,7 +276,7 @@ updateTCP or addr x = do | |||
276 | selectGateway :: TVar (R.BucketList TCP.NodeInfo) -> NodeInfo -> STM (Maybe TCP.NodeInfo) | 276 | selectGateway :: TVar (R.BucketList TCP.NodeInfo) -> NodeInfo -> STM (Maybe TCP.NodeInfo) |
277 | selectGateway tbl ni = do | 277 | selectGateway tbl ni = do |
278 | ns <- kclosest TCP.tcpSpace 2 (nodeId ni) <$> readTVar tbl | 278 | ns <- kclosest TCP.tcpSpace 2 (nodeId ni) <$> readTVar tbl |
279 | return $ listToMaybe ns -- $ dropWhile (\n -> TCP.nodeId n == nodeId ni) ns | 279 | return $ listToMaybe ns -- dropWhile (\n -> TCP.nodeId n == nodeId ni) ns |
280 | 280 | ||
281 | quitRouteBuilder :: OnionRouter -> IO () | 281 | quitRouteBuilder :: OnionRouter -> IO () |
282 | quitRouteBuilder or = do | 282 | quitRouteBuilder or = do |