summaryrefslogtreecommitdiff
path: root/src/Network
diff options
context:
space:
mode:
authorJames Crayne <jim.crayne@gmail.com>2018-05-29 08:30:30 +0000
committerJames Crayne <jim.crayne@gmail.com>2018-05-29 08:30:30 +0000
commitfaf175df2255a279c780bc8b99a5dd1bc41fcbd5 (patch)
tree5997e784cf4942da8d33e316fb00c0717d5cc6dc /src/Network
parent330f627516d207a337ce7e5d83e3163af226d6ef (diff)
use PublicKey to encode handshake not dhtkey
Diffstat (limited to 'src/Network')
-rw-r--r--src/Network/Tox/Crypto/Handlers.hs2
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