From e3ac3ef5603a71b49c27abd3c379c2d591372146 Mon Sep 17 00:00:00 2001
From: Philipp Balzarek
Date: Sun, 26 Jan 2014 16:34:35 +0100
Subject: [PATCH] export simpleAuth and re-export def (from data-default)
---
source/Network/Xmpp.hs | 3 +++
source/Network/Xmpp/Concurrent.hs | 1 +
2 files changed, 4 insertions(+)
diff --git a/source/Network/Xmpp.hs b/source/Network/Xmpp.hs
index 3e451e4..0bf327f 100644
--- a/source/Network/Xmpp.hs
+++ b/source/Network/Xmpp.hs
@@ -64,6 +64,7 @@ module Network.Xmpp
, Username
, Password
, AuthZID
+ , simpleAuth
, scramSha1
, plain
, digestMd5
@@ -222,6 +223,7 @@ module Network.Xmpp
, Plugin'
, ConnectionState(..)
, connectTls
+ , def
) where
import Network.Xmpp.Concurrent
@@ -231,3 +233,4 @@ import Network.Xmpp.Stanza
import Network.Xmpp.Types
import Network.Xmpp.Tls
import Network.Xmpp.Lens hiding (view, set, modify)
+import Data.Default (def)
diff --git a/source/Network/Xmpp/Concurrent.hs b/source/Network/Xmpp/Concurrent.hs
index 9bb2f5a..0753c93 100644
--- a/source/Network/Xmpp/Concurrent.hs
+++ b/source/Network/Xmpp/Concurrent.hs
@@ -15,6 +15,7 @@ module Network.Xmpp.Concurrent
, reconnect
, reconnect'
, reconnectNow
+ , simpleAuth
) where
import Control.Applicative ((<$>))