summaryrefslogtreecommitdiff
path: root/dht/ToxManager.hs
diff options
context:
space:
mode:
authorJoe Crayne <joe@jerkface.net>2020-01-15 20:15:57 -0500
committerJoe Crayne <joe@jerkface.net>2020-01-16 00:15:27 -0500
commit14de512e24922a9fc2c97ecea30011380ed2fad5 (patch)
treed9974383e2473ad5d0cefe09912e1aca4bcabe3c /dht/ToxManager.hs
parent32a9be9211583f8405e92ecc1158f035141820be (diff)
Reverted c3866287: we want to use DHT-key, not the toxid.
Diffstat (limited to 'dht/ToxManager.hs')
-rw-r--r--dht/ToxManager.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/dht/ToxManager.hs b/dht/ToxManager.hs
index 733a0cdc..b0990430 100644
--- a/dht/ToxManager.hs
+++ b/dht/ToxManager.hs
@@ -646,7 +646,7 @@ startConnecting0 tx them contact reason = do
646 let meth = SearchMethod (toxQSearch tox) onResult (nearNodes tox) (key2id them) 30 646 let meth = SearchMethod (toxQSearch tox) onResult (nearNodes tox) (key2id them) 30
647 where 647 where
648 onResult theirkey rendezvous = do 648 onResult theirkey rendezvous = do
649 dkey <- Tox.getContactInfo (Just (txTCP tx,them)) tox 649 dkey <- Tox.getContactInfo tox
650 let tr = Tox.toxToRoute tox 650 let tr = Tox.toxToRoute tox
651 route = Tox.AnnouncedRendezvous theirkey rendezvous 651 route = Tox.AnnouncedRendezvous theirkey rendezvous
652 dput XMan $ unwords [ take 8 (show $ key2id theirkey) 652 dput XMan $ unwords [ take 8 (show $ key2id theirkey)