diff options
Diffstat (limited to 'src/Network/Tox.hs')
-rw-r--r-- | src/Network/Tox.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/Tox.hs b/src/Network/Tox.hs index c13c3b1a..a9b4f2e6 100644 --- a/src/Network/Tox.hs +++ b/src/Network/Tox.hs | |||
@@ -337,7 +337,7 @@ netCryptoWithBackoff millisecs tox myseckey theirpubkey = do | |||
337 | if secnum < 20000000 | 337 | if secnum < 20000000 |
338 | then do | 338 | then do |
339 | hPutStrLn stderr $ "sent handshake, now delaying " ++ show (secnum * 1.25) ++ " second(s).." | 339 | hPutStrLn stderr $ "sent handshake, now delaying " ++ show (secnum * 1.25) ++ " second(s).." |
340 | threadDelay delay | 340 | -- threadDelay delay |
341 | -- Commenting loop for simpler debugging | 341 | -- Commenting loop for simpler debugging |
342 | return [] -- netCryptoWithBackoff delay tox myseckey theirpubkey -- hopefully it will find an active session this time. | 342 | return [] -- netCryptoWithBackoff delay tox myseckey theirpubkey -- hopefully it will find an active session this time. |
343 | else do | 343 | else do |