diff options
author | joe <joe@jerkface.net> | 2013-07-02 16:24:55 -0400 |
---|---|---|
committer | joe <joe@jerkface.net> | 2013-07-02 16:24:55 -0400 |
commit | c62a597bbe0172081686fb9a6b0c7802de903370 (patch) | |
tree | bd727dd7d9515ac3aa6f6bc598dd8d6093f6aa60 /Presence/XMPPTypes.hs | |
parent | f86afeb6a028d46a436a7eb6065c007381cce5a0 (diff) |
Send cached presence to client
Diffstat (limited to 'Presence/XMPPTypes.hs')
-rw-r--r-- | Presence/XMPPTypes.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Presence/XMPPTypes.hs b/Presence/XMPPTypes.hs index 6e054708..6fc3e2ec 100644 --- a/Presence/XMPPTypes.hs +++ b/Presence/XMPPTypes.hs | |||
@@ -38,6 +38,7 @@ class JabberClientSession session where | |||
38 | getJID :: session -> IO JID | 38 | getJID :: session -> IO JID |
39 | closeSession :: session -> IO () | 39 | closeSession :: session -> IO () |
40 | subscribe :: session -> Maybe JID -> IO (TChan Presence) | 40 | subscribe :: session -> Maybe JID -> IO (TChan Presence) |
41 | forCachedPresence :: session -> (Presence -> IO ()) -> IO () | ||
41 | 42 | ||
42 | class JabberPeerSession session where | 43 | class JabberPeerSession session where |
43 | data XMPPPeerClass session | 44 | data XMPPPeerClass session |