network-protocol-xmpp 0.4.3 → 0.4.4
raw patch · 4 files changed
+17/−5 lines, 4 filesdep ~bytestringdep ~gnutlsdep ~networkPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: bytestring, gnutls, network
API changes (from Hackage documentation)
+ Network.Protocol.XMPP: sessionIsSecure :: XMPP Bool
Files
- lib/Network/Protocol/XMPP.hs +1/−0
- lib/Network/Protocol/XMPP/Handle.hs +5/−0
- lib/Network/Protocol/XMPP/Monad.hs +6/−0
- network-protocol-xmpp.cabal +5/−5
lib/Network/Protocol/XMPP.hs view
@@ -62,6 +62,7 @@ -- ** Resuming sessions , Session , getSession+ , sessionIsSecure , runXMPP ) where
lib/Network/Protocol/XMPP/Handle.hs view
@@ -20,6 +20,7 @@ , startTLS , hPutBytes , hGetBytes+ , handleIsSecure ) where import Control.Monad (when)@@ -69,3 +70,7 @@ when (pending == 0) (liftIO wait) lazy <- TLS.getBytes n return (Data.ByteString.concat (Data.ByteString.Lazy.toChunks lazy))++handleIsSecure :: Handle -> Bool+handleIsSecure PlainHandle{} = False+handleIsSecure SecureHandle{} = True
lib/Network/Protocol/XMPP/Monad.hs view
@@ -26,6 +26,7 @@ , getHandle , getSession+ , sessionIsSecure , readEvents , getElement@@ -139,6 +140,11 @@ getHandle :: XMPP H.Handle getHandle = fmap sessionHandle getSession++sessionIsSecure :: XMPP Bool+sessionIsSecure = do+ h <- getHandle+ return (H.handleIsSecure h) liftTLS :: ErrorT Text IO a -> XMPP a liftTLS io = do
network-protocol-xmpp.cabal view
@@ -1,5 +1,5 @@ name: network-protocol-xmpp-version: 0.4.3+version: 0.4.4 license: GPL-3 license-file: license.txt author: John Millikin <jmillikin@gmail.com>, Stephan Maka <stephan@spaceboyz.net>@@ -21,7 +21,7 @@ source-repository this type: bazaar location: https://john-millikin.com/branches/network-protocol-xmpp/0.4/- tag: network-protocol-xmpp_0.4.3+ tag: network-protocol-xmpp_0.4.4 library ghc-options: -Wall -O2@@ -29,13 +29,13 @@ build-depends: base >= 4.0 && < 5.0- , bytestring >= 0.9 && < 0.10+ , bytestring >= 0.9 , gnuidn >= 0.2 && < 0.3- , gnutls >= 0.1 && < 0.3+ , gnutls >= 0.1.4 && < 0.3 , gsasl >= 0.3 && < 0.4 , libxml-sax >= 0.7 && < 0.8 , monads-tf >= 0.1 && < 0.2- , network >= 2.2 && < 2.4+ , network >= 2.2 , text >= 0.10 && < 0.12 , transformers >= 0.2 , xml-types >= 0.3 && < 0.4