From dab0fc705e1b8ecd2ba46ee995258b78584a67ae Mon Sep 17 00:00:00 2001
From: Jon Kristensen <info@jonkri.com>
Date: Thu, 14 Feb 2013 22:35:00 +0100
Subject: [PATCH] XEP modules depend only on `Network.Xmpp' and
 `Network.Xmpp.Internal'

---
 source/Network/Xmpp/Internal.hs               | 5 +++++
 source/Network/Xmpp/Xep/InbandRegistration.hs | 4 +---
 source/Network/Xmpp/Xep/ServiceDiscovery.hs   | 6 +-----
 3 files changed, 7 insertions(+), 8 deletions(-)

diff --git a/source/Network/Xmpp/Internal.hs b/source/Network/Xmpp/Internal.hs
index 47da87d..1e961e7 100644
--- a/source/Network/Xmpp/Internal.hs
+++ b/source/Network/Xmpp/Internal.hs
@@ -28,6 +28,10 @@ module Network.Xmpp.Internal
   , auth
   , pushStanza
   , pullStanza
+  , pushIQ'
+  , pickleElem
+  , unpickleElem
+  , xpLangTag
  )
 
        where
@@ -37,3 +41,4 @@ import Network.Xmpp.Sasl
 import Network.Xmpp.Tls
 import Network.Xmpp.Types
 import Network.Xmpp.Stream
+import Network.Xmpp.Marshal
diff --git a/source/Network/Xmpp/Xep/InbandRegistration.hs b/source/Network/Xmpp/Xep/InbandRegistration.hs
index c8ceeb6..e970310 100644
--- a/source/Network/Xmpp/Xep/InbandRegistration.hs
+++ b/source/Network/Xmpp/Xep/InbandRegistration.hs
@@ -19,9 +19,7 @@ import qualified Data.Text as Text
 import           Data.XML.Pickle
 import qualified Data.XML.Types as XML
 
-import           Network.Xmpp.Stream
-import           Network.Xmpp.Pickle
-import           Network.Xmpp.Types
+import           Network.Xmpp.Internal
 import           Network.Xmpp.Xep.ServiceDiscovery
 
 
diff --git a/source/Network/Xmpp/Xep/ServiceDiscovery.hs b/source/Network/Xmpp/Xep/ServiceDiscovery.hs
index 01be720..298f420 100644
--- a/source/Network/Xmpp/Xep/ServiceDiscovery.hs
+++ b/source/Network/Xmpp/Xep/ServiceDiscovery.hs
@@ -25,11 +25,7 @@ import           Data.XML.Pickle
 import           Data.XML.Types
 
 import           Network.Xmpp
-import           Network.Xmpp.Concurrent
-import           Network.Xmpp.Concurrent.Types
-import           Network.Xmpp.Stream
-import           Network.Xmpp.Marshal
-import           Network.Xmpp.Types
+import           Network.Xmpp.Internal
 import           Control.Concurrent.STM.TMVar
 
 data DiscoError = DiscoNoQueryElement