summaryrefslogtreecommitdiff
path: root/src/Network
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network')
-rw-r--r--src/Network/Tox.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Network/Tox.hs b/src/Network/Tox.hs
index 7ee4dbe0..66a19097 100644
--- a/src/Network/Tox.hs
+++ b/src/Network/Tox.hs
@@ -346,7 +346,8 @@ netCryptoWithBackoff millisecs tox myseckey theirpubkey = do
346 then do 346 then do
347 hPutStrLn stderr $ "sent handshake, now delaying " ++ show (secnum * 1.25) ++ " second(s).." 347 hPutStrLn stderr $ "sent handshake, now delaying " ++ show (secnum * 1.25) ++ " second(s).."
348 threadDelay delay 348 threadDelay delay
349 netCryptoWithBackoff delay tox myseckey theirpubkey -- hopefully it will find an active session this time. 349 -- Commenting loop for simpler debugging
350 return [] -- netCryptoWithBackoff delay tox myseckey theirpubkey -- hopefully it will find an active session this time.
350 else do 351 else do
351 hPutStrLn stderr "Unable to establish session..." 352 hPutStrLn stderr "Unable to establish session..."
352 return [] 353 return []