diff options
Diffstat (limited to 'dht/src/Network/Tox.hs')
-rw-r--r-- | dht/src/Network/Tox.hs | 4 |
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 | ||
394 | onionTimeout :: Tox extra -> DHT.TransactionId -> Onion.OnionDestination RouteId -> STM (Onion.OnionDestination RouteId, Int) | 394 | onionTimeout :: Tox extra -> Onion.OnionDestination RouteId -> STM (Onion.OnionDestination RouteId, Int) |
395 | onionTimeout Tox { toxOnionRoutes = or } (DHT.TransactionId n8 _) od = lookupTimeout or n8 od | 395 | onionTimeout Tox { toxOnionRoutes = or } od = lookupTimeout or od |
396 | 396 | ||
397 | routing4nodeInfo :: DHT.Routing -> IO NodeInfo | 397 | routing4nodeInfo :: DHT.Routing -> IO NodeInfo |
398 | routing4nodeInfo (DHT.routing4 -> tv) = R.thisNode <$> readTVarIO tv | 398 | routing4nodeInfo (DHT.routing4 -> tv) = R.thisNode <$> readTVarIO tv |