diff options
Diffstat (limited to 'dht/ToxManager.hs')
-rw-r--r-- | dht/ToxManager.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dht/ToxManager.hs b/dht/ToxManager.hs index 63cb3967..c1112a05 100644 --- a/dht/ToxManager.hs +++ b/dht/ToxManager.hs | |||
@@ -303,7 +303,7 @@ connectViaRelay tx theirKey theirDhtKey ann tkey now = do | |||
303 | let theirDhtKey' = theirDhtKey { Tox.dhtpkNodes = Tox.SendNodes (cycled ns) } | 303 | let theirDhtKey' = theirDhtKey { Tox.dhtpkNodes = Tox.SendNodes (cycled ns) } |
304 | scheduleRel ann tkey (ScheduledItem $ connectViaRelay tx theirKey theirDhtKey') 5 | 304 | scheduleRel ann tkey (ScheduledItem $ connectViaRelay tx theirKey theirDhtKey') 5 |
305 | return $ when (not established) (go ns) | 305 | return $ when (not established) (go ns) |
306 | -- $ scheduleImmediately ann tkey $ ScheduledItem go | 306 | -- scheduleImmediately ann tkey $ ScheduledItem go |
307 | -- return $ return () | 307 | -- return $ return () |
308 | where | 308 | where |
309 | myPublicKey = toPublic $ userSecret (txAccount tx) | 309 | myPublicKey = toPublic $ userSecret (txAccount tx) |