From 45e96346d7ce952f65b44b4e1e3c98287cf4b2da Mon Sep 17 00:00:00 2001 From: James Crayne Date: Thu, 31 May 2018 01:44:09 +0000 Subject: uninitialized HParam fields should be Nothing not error --- src/Network/Tox.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/Network/Tox.hs b/src/Network/Tox.hs index 9d785f67..ce9939a9 100644 --- a/src/Network/Tox.hs +++ b/src/Network/Tox.hs @@ -319,8 +319,8 @@ netCryptoWithBackoff millisecs tox myseckey theirpubkey = do , hpMySecretKey = myseckey , hpCookieRemotePubkey = theirpubkey , hpCookieRemoteDhtkey = theirDhtKey - , hpTheirBaseNonce = error "netCrypto: Unreachable! hpTheirBaseNonce" - , hpTheirSessionKeyPublic = error "netCrypto: Unreachable! hpTheirSessionKeyPublic" + , hpTheirBaseNonce = Nothing + , hpTheirSessionKeyPublic = Nothing } freshCryptoSession (toxCryptoSessions tox) saddr hp -- myhandshake <- do -- cgit v1.2.3