comment netcrypto backoff loop for simpler debugging

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
                           then do
                             hPutStrLn stderr $ "sent handshake, now delaying " ++ show (secnum * 1.25) ++ "  second(s).."
                             threadDelay delay
-                            netCryptoWithBackoff delay tox myseckey theirpubkey -- hopefully it will find an active session this time.
+                            -- Commenting loop for simpler debugging
+                            return [] -- netCryptoWithBackoff delay tox myseckey theirpubkey -- hopefully it will find an active session this time.
                           else do
                             hPutStrLn stderr "Unable to establish session..."
                             return []