diff options
Diffstat (limited to 'ToxManager.hs')
| -rw-r--r-- | ToxManager.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ToxManager.hs b/ToxManager.hs index 1e9c618d..460b2fe5 100644 --- a/ToxManager.hs +++ b/ToxManager.hs | |||
| @@ -111,8 +111,8 @@ toxman announcer toxbkts tox presence = ToxManager | |||
| 111 | -- Stop the recurring search for that contact | 111 | -- Stop the recurring search for that contact |
| 112 | -- | 112 | -- |
| 113 | -- Stop recurring announce. | 113 | -- Stop recurring announce. |
| 114 | akey <- packAnnounceKey announcer ("toxid:" ++ show pubid) | ||
| 114 | fmap Just $ forM toxbkts $ \(nm,bkts) -> do | 115 | fmap Just $ forM toxbkts $ \(nm,bkts) -> do |
| 115 | akey <- packAnnounceKey announcer (nm ++ "id:" ++ show pubid) | ||
| 116 | return (akey,bkts) | 116 | return (akey,bkts) |
| 117 | else return Nothing | 117 | else return Nothing |
| 118 | forM_ bStopped $ \kbkts -> do | 118 | forM_ bStopped $ \kbkts -> do |