pontarius-xmpp/source/Network/Xmpp/Presence.hs

{-# OPTIONS_HADDOCK hide #-}

module Network.Xmpp.Presence where

import Data.Text(Text)
import Network.Xmpp.Types

-- | Add a recipient to a presence notification.
presTo :: Presence -> JID -> Presence
presTo pres to = pres{presenceTo = Just to}
preliminary shaping of API structure, documentation 14 years ago			`{-# OPTIONS_HADDOCK hide #-}`
minor formatting and documentation changes 14 years ago
replace XMPP with Xmpp everywhere to unify style replace SASL with Sasl replace DIGEST_MD5 with DigestMD5 replace PLAIN with Plain 14 years ago			`module Network.Xmpp.Presence where`
added some helper functions 14 years ago
			`import Data.Text(Text)`
replace XMPP with Xmpp everywhere to unify style replace SASL with Sasl replace DIGEST_MD5 with DigestMD5 replace PLAIN with Plain 14 years ago			`import Network.Xmpp.Types`
added some helper functions 14 years ago
minor formatting and documentation changes 14 years ago			`-- \| Add a recipient to a presence notification.`
Merge branch 'xmpp-lib' Conflicts: LICENSE src/Network/XMPP.hs src/Network/XMPP/SASL.hs src/Network/XMPP/Session.hs src/Network/XMPP/Stream.hs src/Network/XMPP/TLS.hs src/Network/XMPP/Types.hs 14 years ago			`presTo :: Presence -> JID -> Presence`
			`presTo pres to = pres{presenceTo = Just to}`