export getFeatures from Network.Xmpp

source/Network/Xmpp.hs

@@ -59,6 +59,9 @@ module Network.Xmpp
   , endSession
   , waitForStream
   , streamState
+    -- ** Feature
+  , StreamFeatures(..)
+  , getFeatures
     -- ** Authentication handlers
     -- | The use of 'scramSha1' is /recommended/, but 'digestMd5' might be
     -- useful for interaction with older implementations.

source/Network/Xmpp/Concurrent/Basic.hs

@@ -56,7 +56,7 @@ getJid Session{streamRef = st} = do
     s <- atomically $ readTMVar st
     withStream' (gets streamJid) s
 
--- | Return the JID assigned to us by the server
+-- | Return the stream features the server announced
 getFeatures :: Session -> IO StreamFeatures
 getFeatures Session{streamRef = st} = do
     s <- atomically $ readTMVar st