diff options
| author | joe <joe@jerkface.net> | 2018-06-18 13:32:02 -0400 |
|---|---|---|
| committer | joe <joe@jerkface.net> | 2018-06-18 13:32:02 -0400 |
| commit | a45b000e07a806e171f1e4701abd3e025382ecf3 (patch) | |
| tree | 52b562e145a2c19ba255a73fdf914af953a39e11 /ToxToXMPP.hs | |
| parent | 19364a287f7083fc60beed2d6eae3dd71d27e737 (diff) | |
Factored separate code-paths for Kademlia announce versus action
on search result.
Diffstat (limited to 'ToxToXMPP.hs')
| -rw-r--r-- | ToxToXMPP.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ToxToXMPP.hs b/ToxToXMPP.hs index ac24ce6d..ad5cb0dd 100644 --- a/ToxToXMPP.hs +++ b/ToxToXMPP.hs | |||
| @@ -165,10 +165,10 @@ forkAccountWatcher acc tox st announcer = forkIO $ do | |||
| 165 | -- likelihood of failure as the chances of packet loss | 165 | -- likelihood of failure as the chances of packet loss |
| 166 | -- happening to all (up to to 8) packets sent is low. | 166 | -- happening to all (up to to 8) packets sent is low. |
| 167 | -- | 167 | -- |
| 168 | schedule announcer | 168 | scheduleSearch announcer |
| 169 | akey | 169 | akey |
| 170 | (AnnounceMethod (toxQSearch tox) | 170 | (SearchMethod (toxQSearch tox) |
| 171 | (Left $ \theirkey rendezvous -> do | 171 | (\theirkey rendezvous -> do |
| 172 | dkey <- Tox.getContactInfo tox | 172 | dkey <- Tox.getContactInfo tox |
| 173 | sendMessage | 173 | sendMessage |
| 174 | (Tox.toxToRoute tox) | 174 | (Tox.toxToRoute tox) |