xml-push 0.0.0.12 → 0.0.0.13
raw patch · 3 files changed
+2/−9 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- src/Network/XmlPush/Xmpp/Server.hs +0/−4
- src/Network/XmlPush/Xmpp/Tls/Server.hs +0/−3
- xml-push.cabal +2/−2
src/Network/XmlPush/Xmpp/Server.hs view
@@ -17,7 +17,6 @@ import Data.HandleLike import Data.Pipe import Data.Pipe.Flow-import Data.Pipe.IO import Text.XML.Pipe import Network.XMPiPe.Core.C2S.Server import Network.Sasl@@ -51,16 +50,13 @@ fromHandleLike (THandle h) =$= bind dn [] =@= toHandleLike (THandle h)- liftBase . print $ user st let r = fromHandleLike h =$= input ns- =$= debug =$= setIds h ynr (user st) rids =$= convert fromMessage =$= filter isJust =$= convert fromJust w = makeMpi (user st) inr rids- =$= debug =$= output =$= toHandleLike h return $ XmppServer r w
src/Network/XmlPush/Xmpp/Tls/Server.hs view
@@ -19,7 +19,6 @@ import Data.HandleLike import Data.Pipe import Data.Pipe.Flow-import Data.Pipe.IO import Data.Pipe.TChan import Data.UUID import Data.X509@@ -73,7 +72,6 @@ fromTChan inp =$= bind dn [] =@= toTChan otp let r = fromTChan inp =$= input ns- =$= debug =$= setIds h ynr (user st) rids =$= convert fromMessage =$= filter isJust@@ -81,7 +79,6 @@ =$= checkName cn gn =$= checkCert c cc w = makeMpi (user st) inr rids- =$= debug =$= output =$= toTChan otp return $ XmppTlsServer r w
xml-push.cabal view
@@ -2,7 +2,7 @@ cabal-version: >= 1.8 name: xml-push-version: 0.0.0.12+version: 0.0.0.13 stability: Experimenmtal author: Yoshikuni Jujo <PAF01143@nifty.ne.jp> maintainer: Yoshikuni Jujo <PAF01143@nifty.ne.jp>@@ -100,7 +100,7 @@ source-repository this type: git location: git://github.com/YoshikuniJujo/xml-push.git- tag: xml-push-0.0.0.12+ tag: xml-push-0.0.0.13 library hs-source-dirs: src