summaryrefslogtreecommitdiff
path: root/dht/src/Network/Tox.hs
diff options
context:
space:
mode:
authorJoe Crayne <joe@jerkface.net>2019-12-01 20:22:30 -0500
committerJoe Crayne <joe@jerkface.net>2020-01-01 23:22:52 -0500
commitbb190ea0bb2671214aad75f43f06a7c41c94f2bd (patch)
treea6c749eab356aeec91032e2ffdcd456aeebba73b /dht/src/Network/Tox.hs
parent7c88315f6e01e203c537fa3193a83acd3a7afa2c (diff)
Remove query-id dependency from timeout computation.
Diffstat (limited to 'dht/src/Network/Tox.hs')
-rw-r--r--dht/src/Network/Tox.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/dht/src/Network/Tox.hs b/dht/src/Network/Tox.hs
index 8a952aa4..34e63ad8 100644
--- a/dht/src/Network/Tox.hs
+++ b/dht/src/Network/Tox.hs
@@ -391,8 +391,8 @@ newToxOverTransport keydb addr onNewSession (crypto,roster) udp tcp = do
391 , toxRelayServer = Nothing 391 , toxRelayServer = Nothing
392 } 392 }
393 393
394onionTimeout :: Tox extra -> DHT.TransactionId -> Onion.OnionDestination RouteId -> STM (Onion.OnionDestination RouteId, Int) 394onionTimeout :: Tox extra -> Onion.OnionDestination RouteId -> STM (Onion.OnionDestination RouteId, Int)
395onionTimeout Tox { toxOnionRoutes = or } (DHT.TransactionId n8 _) od = lookupTimeout or n8 od 395onionTimeout Tox { toxOnionRoutes = or } od = lookupTimeout or od
396 396
397routing4nodeInfo :: DHT.Routing -> IO NodeInfo 397routing4nodeInfo :: DHT.Routing -> IO NodeInfo
398routing4nodeInfo (DHT.routing4 -> tv) = R.thisNode <$> readTVarIO tv 398routing4nodeInfo (DHT.routing4 -> tv) = R.thisNode <$> readTVarIO tv