diff options
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) |