summaryrefslogtreecommitdiff
path: root/src/Network/Tox
diff options
context:
space:
mode:
authorAndrew Cady <d@jerkface.net>2018-06-19 17:18:30 -0400
committerAndrew Cady <d@jerkface.net>2018-06-20 19:48:38 -0400
commit07ef8d1d2fe204b628e08200a975effc51538163 (patch)
treedc07258f5585502f9eb8265403b13a8db5677754 /src/Network/Tox
parentff1f7c5f2815f81ba7156b409dde5eec87bf41ae (diff)
route more logging through dput
Diffstat (limited to 'src/Network/Tox')
-rw-r--r--src/Network/Tox/Onion/Transport.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/Tox/Onion/Transport.hs b/src/Network/Tox/Onion/Transport.hs
index 0da48f76..8a66f2b2 100644
--- a/src/Network/Tox/Onion/Transport.hs
+++ b/src/Network/Tox/Onion/Transport.hs
@@ -924,7 +924,7 @@ encodeDataToRoute crypto ((me,omsg), AnnouncedRendezvous toxid (Rendezvous pub n
924 } 924 }
925 outerSecret <- lookupSharedSecret crypto (onionAliasSecret crypto) pub nonce 925 outerSecret <- lookupSharedSecret crypto (onionAliasSecret crypto) pub nonce
926 let dta = ToxCrypto.encrypt outerSecret plain 926 let dta = ToxCrypto.encrypt outerSecret plain
927 hPutStrLn stderr $ unlines 927 dput XOnion $ unlines
928 [ "encodeDataToRoute me=" ++ show (key2id me) 928 [ "encodeDataToRoute me=" ++ show (key2id me)
929 , " dhtpk=" ++ case omsg of 929 , " dhtpk=" ++ case omsg of
930 OnionDHTPublicKey dmsg -> show (key2id $ dhtpk dmsg) 930 OnionDHTPublicKey dmsg -> show (key2id $ dhtpk dmsg)