rename Network.Xmpp.Monad to Network.Xmpp.Connection

pontarius-xmpp.cabal

@@ -61,7 +61,7 @@ Library
                  , Network.Xmpp.IM.Message
                  , Network.Xmpp.IM.Presence
                  , Network.Xmpp.Marshal
-                 , Network.Xmpp.Monad
+                 , Network.Xmpp.Connection
                  , Network.Xmpp.Message
                  , Network.Xmpp.Pickle
                  , Network.Xmpp.Presence

source/Network/Xmpp.hs

@@ -155,9 +155,9 @@ import           Network.Xmpp.Bind
 import Network.Xmpp.Concurrent
 import Network.Xmpp.Concurrent.Channels
 import Network.Xmpp.Concurrent.Types
+import Network.Xmpp.Connection
 import Network.Xmpp.Marshal
 import Network.Xmpp.Message
-import           Network.Xmpp.Monad
 import Network.Xmpp.Presence
 import Network.Xmpp.Sasl
 import Network.Xmpp.Session

source/Network/Xmpp/Basic.hs

@@ -16,9 +16,9 @@ module Network.Xmpp.Basic
 
        where
 
-import Network.Xmpp.Monad
+import Network.Xmpp.Connection
 import Network.Xmpp.Sasl
+import Network.Xmpp.Session
 import Network.Xmpp.Stream
 import Network.Xmpp.TLS
 import Network.Xmpp.Types
-import Network.Xmpp.Session

source/Network/Xmpp/Bind.hs

@@ -11,9 +11,9 @@ import Data.Text as Text
 import Data.XML.Pickle
 import Data.XML.Types
 
-import Network.Xmpp.Types
+import Network.Xmpp.Connection
 import Network.Xmpp.Pickle
-import Network.Xmpp.Monad
+import Network.Xmpp.Types
 
 import Control.Monad.State(modify)
 

source/Network/Xmpp/Concurrent/Monad.hs

@@ -18,7 +18,7 @@ import qualified Data.Map as Map
 import           Data.Text(Text)
 
 import           Network.Xmpp.Concurrent.Types
-import           Network.Xmpp.Monad
+import           Network.Xmpp.Connection
 
 
 

source/Network/Xmpp/Concurrent/Threads.hs

@@ -15,8 +15,8 @@ import Control.Monad.IO.Class
 import           Control.Monad.State.Strict
 
 import qualified Data.ByteString as BS
-import Network.Xmpp.Monad
 import           Network.Xmpp.Concurrent.Types
+import           Network.Xmpp.Connection
 
 import           GHC.IO (unsafeUnmask)
 

source/Network/Xmpp/Connection.hs

@@ -2,7 +2,7 @@
 {-# LANGUAGE ScopedTypeVariables #-}
 {-# LANGUAGE OverloadedStrings #-}
 
-module Network.Xmpp.Monad where
+module Network.Xmpp.Connection where
 
 import           Control.Applicative((<$>))
 import           Control.Concurrent (forkIO, threadDelay)

source/Network/Xmpp/Sasl.hs

@@ -29,10 +29,10 @@ import qualified Data.Text as Text
 import           Data.Text (Text)
 import qualified Data.Text.Encoding as Text
 
-import           Network.Xmpp.Monad
+import           Network.Xmpp.Connection
+import           Network.Xmpp.Pickle
 import           Network.Xmpp.Stream
 import           Network.Xmpp.Types
-import           Network.Xmpp.Pickle
 
 import qualified System.Random as Random
 

source/Network/Xmpp/Sasl/Common.hs

@@ -22,10 +22,10 @@ import           Data.Word (Word8)
 import           Data.XML.Pickle
 import           Data.XML.Types
 
-import           Network.Xmpp.Monad
+import           Network.Xmpp.Connection
 import           Network.Xmpp.Pickle
-import           Network.Xmpp.Sasl.Types
 import           Network.Xmpp.Sasl.StringPrep
+import           Network.Xmpp.Sasl.Types
 
 import qualified System.Random as Random
 

source/Network/Xmpp/Sasl/Mechanisms/DigestMd5.hs

@@ -31,7 +31,7 @@ import qualified Data.ByteString as BS
 
 import           Data.XML.Types
 
-import           Network.Xmpp.Monad
+import           Network.Xmpp.Connection
 import           Network.Xmpp.Pickle
 import           Network.Xmpp.Stream
 import           Network.Xmpp.Types

source/Network/Xmpp/Sasl/Mechanisms/Plain.hs

@@ -35,10 +35,10 @@ import qualified Data.ByteString as BS
 
 import           Data.XML.Types
 
-import           Network.Xmpp.Monad
+import           Network.Xmpp.Connection
+import           Network.Xmpp.Pickle
 import           Network.Xmpp.Stream
 import           Network.Xmpp.Types
-import           Network.Xmpp.Pickle
 
 import qualified System.Random as Random
 

source/Network/Xmpp/Session.hs

@@ -6,19 +6,19 @@ import           Control.Monad.Error
 import           Data.Text as Text
 import           Data.XML.Pickle
 import           Data.XML.Types(Element)
+import           Network
 import qualified Network.TLS as TLS
 import           Network.Xmpp.Bind
 import           Network.Xmpp.Concurrent.Types
+import           Network.Xmpp.Connection
 import           Network.Xmpp.Marshal
-import           Network.Xmpp.Monad
 import           Network.Xmpp.Pickle
 import           Network.Xmpp.Sasl
 import           Network.Xmpp.Sasl.Mechanisms
 import           Network.Xmpp.Sasl.Types
 import           Network.Xmpp.Stream
-import           Network.Xmpp.Types
-import           Network
 import           Network.Xmpp.TLS
+import           Network.Xmpp.Types
 
 -- | The quick and easy way to set up a connection to an XMPP server
 --

source/Network/Xmpp/Stream.hs

@@ -19,10 +19,10 @@ import           Data.Void (Void)
 import           Data.XML.Pickle
 import           Data.XML.Types
 
-import           Network.Xmpp.Monad
+import           Network.Xmpp.Connection
+import           Network.Xmpp.Errors
 import           Network.Xmpp.Pickle
 import           Network.Xmpp.Types
-import           Network.Xmpp.Errors
 
 import           Text.XML.Stream.Elements
 import           Text.XML.Stream.Parse as XP

source/Network/Xmpp/TLS.hs

@@ -17,7 +17,7 @@ import           Data.Conduit.TLS as TLS
 import           Data.Typeable
 import           Data.XML.Types
 
-import           Network.Xmpp.Monad
+import           Network.Xmpp.Connection
 import           Network.Xmpp.Pickle(ppElement)
 import           Network.Xmpp.Stream
 import           Network.Xmpp.Types

source/Network/Xmpp/Xep/InbandRegistration.hs

@@ -19,7 +19,7 @@ import qualified Data.Text as Text
 import           Data.XML.Pickle
 import qualified Data.XML.Types as XML
 
-import           Network.Xmpp.Monad
+import           Network.Xmpp.Connection
 import           Network.Xmpp.Pickle
 import           Network.Xmpp.Types
 import           Network.Xmpp.Xep.ServiceDiscovery

source/Network/Xmpp/Xep/ServiceDiscovery.hs

@@ -25,12 +25,12 @@ import           Data.XML.Pickle
 import           Data.XML.Types
 
 import           Network.Xmpp
-import           Network.Xmpp.Monad
-import           Network.Xmpp.Pickle
-import           Network.Xmpp.Types
 import           Network.Xmpp.Concurrent
-import           Network.Xmpp.Concurrent.Types
 import           Network.Xmpp.Concurrent.Channels
+import           Network.Xmpp.Concurrent.Types
+import           Network.Xmpp.Connection
+import           Network.Xmpp.Pickle
+import           Network.Xmpp.Types
 
 data DiscoError = DiscoNoQueryElement
                 | DiscoIQError IQError