summaryrefslogtreecommitdiff
path: root/dht/src/Network/Tox/Onion
diff options
context:
space:
mode:
authorJames Crayne <jim.crayne@gmail.com>2020-01-24 09:10:56 +0000
committerJames Crayne <jim.crayne@gmail.com>2020-01-24 09:10:56 +0000
commit770649a15332df52e98c8d99582e5d67d8d84787 (patch)
tree9b9c3382bb5113182f1ddc9b738f60df16e2317f /dht/src/Network/Tox/Onion
parentb7d05c1aa9fe88880eca5ee3f6a20ac16c9e6137 (diff)
fix formatting which confuses haddock
Diffstat (limited to 'dht/src/Network/Tox/Onion')
-rw-r--r--dht/src/Network/Tox/Onion/Routes.hs2
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
276selectGateway :: TVar (R.BucketList TCP.NodeInfo) -> NodeInfo -> STM (Maybe TCP.NodeInfo) 276selectGateway :: TVar (R.BucketList TCP.NodeInfo) -> NodeInfo -> STM (Maybe TCP.NodeInfo)
277selectGateway tbl ni = do 277selectGateway 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
281quitRouteBuilder :: OnionRouter -> IO () 281quitRouteBuilder :: OnionRouter -> IO ()
282quitRouteBuilder or = do 282quitRouteBuilder or = do