diff options
author | James Crayne <jim.crayne@gmail.com> | 2018-05-29 08:30:30 +0000 |
---|---|---|
committer | James Crayne <jim.crayne@gmail.com> | 2018-05-29 08:30:30 +0000 |
commit | faf175df2255a279c780bc8b99a5dd1bc41fcbd5 (patch) | |
tree | 5997e784cf4942da8d33e316fb00c0717d5cc6dc /src/Network | |
parent | 330f627516d207a337ce7e5d83e3163af226d6ef (diff) |
use PublicKey to encode handshake not dhtkey
Diffstat (limited to 'src/Network')
-rw-r--r-- | src/Network/Tox/Crypto/Handlers.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/Tox/Crypto/Handlers.hs b/src/Network/Tox/Crypto/Handlers.hs index 485c5219..9e023b29 100644 --- a/src/Network/Tox/Crypto/Handlers.hs +++ b/src/Network/Tox/Crypto/Handlers.hs | |||
@@ -415,7 +415,7 @@ freshCryptoSession sessions | |||
415 | ncState0 <- atomically $ newTVar Accepted | 415 | ncState0 <- atomically $ newTVar Accepted |
416 | ncTheirBaseNonce0 <- atomically $ newTVar theirBaseNonce | 416 | ncTheirBaseNonce0 <- atomically $ newTVar theirBaseNonce |
417 | n24 <- atomically $ transportNewNonce crypto | 417 | n24 <- atomically $ transportNewNonce crypto |
418 | state <- lookupSharedSecret crypto key remoteDhtPublicKey n24 | 418 | state <- lookupSharedSecret crypto key remotePublicKey n24 |
419 | newBaseNonce <- atomically $ transportNewNonce crypto | 419 | newBaseNonce <- atomically $ transportNewNonce crypto |
420 | mbMyhandshakeData <- newHandShakeData crypto newBaseNonce hp addr | 420 | mbMyhandshakeData <- newHandShakeData crypto newBaseNonce hp addr |
421 | let encodeHandshake myhandshakeData = let plain = encodePlain myhandshakeData | 421 | let encodeHandshake myhandshakeData = let plain = encodePlain myhandshakeData |