diff options
Diffstat (limited to 'Presence/main.hs')
-rw-r--r-- | Presence/main.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/Presence/main.hs b/Presence/main.hs index fa4a98c1..2c0a6cfb 100644 --- a/Presence/main.hs +++ b/Presence/main.hs | |||
@@ -246,7 +246,6 @@ sendProbes state jid = do | |||
246 | jids <- maybe (return Set.empty) readTVarIO mjids | 246 | jids <- maybe (return Set.empty) readTVarIO mjids |
247 | let noinfo = Set.notMember buddy jids | 247 | let noinfo = Set.notMember buddy jids |
248 | when noinfo $ do | 248 | when noinfo $ do |
249 | -- TODO ... sendMessage | ||
250 | sendMessage (outGoingConnections state) (PresenceProbe buddy) (peer buddy) | 249 | sendMessage (outGoingConnections state) (PresenceProbe buddy) (peer buddy) |
251 | return () | 250 | return () |
252 | 251 | ||