From c62a597bbe0172081686fb9a6b0c7802de903370 Mon Sep 17 00:00:00 2001 From: joe Date: Tue, 2 Jul 2013 16:24:55 -0400 Subject: Send cached presence to client --- Presence/XMPPTypes.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'Presence/XMPPTypes.hs') 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 getJID :: session -> IO JID closeSession :: session -> IO () subscribe :: session -> Maybe JID -> IO (TChan Presence) + forCachedPresence :: session -> (Presence -> IO ()) -> IO () class JabberPeerSession session where data XMPPPeerClass session -- cgit v1.2.3