diff options
author | James Crayne <jim.crayne@gmail.com> | 2020-01-24 09:10:56 +0000 |
---|---|---|
committer | James Crayne <jim.crayne@gmail.com> | 2020-01-24 09:10:56 +0000 |
commit | 770649a15332df52e98c8d99582e5d67d8d84787 (patch) | |
tree | 9b9c3382bb5113182f1ddc9b738f60df16e2317f /dht/src/Network/Tox/Onion/Routes.hs | |
parent | b7d05c1aa9fe88880eca5ee3f6a20ac16c9e6137 (diff) |
fix formatting which confuses haddock
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 |