From c32e5e1b8384c843ad750acff81f671d2b98777a Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Sat, 12 Aug 2017 22:25:00 +0200
Subject: Lib.hs: Make `Network.IRC.Client` a qualified import

Make it a bit more obvious where these functions are coming from by
prefixing them with `IRC.`.
---
 src/Lib.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'src')

diff --git a/src/Lib.hs b/src/Lib.hs
index 38fc283..63b6367 100644
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -8,7 +8,7 @@ import qualified Data.ByteString as B
 import qualified Data.Text as T
 
 import Database.SQLite.Simple
-import Network.IRC.Client
+import qualified Network.IRC.Client as IRC
 
 import Message
 import Plugin
@@ -31,10 +31,10 @@ someFunc = do
 
 connectIRC :: B.ByteString -> Int -> T.Text -> IO ()
 connectIRC host port nick = do
-    conn <- connectWithTLS host port 1
-    let cfg = defaultIRCConf nick
+    conn <- IRC.connectWithTLS host port 1
+    let cfg = IRC.defaultIRCConf nick
     -- let cfg' = cfg { _eventHandlers = yourCustomEventHandlers : _eventHandlers cfg }
     let cfg' = cfg {
-          _channels = ["#test-chan-13513"]
+          IRC._channels = ["#test-chan-13513"]
         }
-    start conn cfg'
+    IRC.start conn cfg'
-- 
cgit v1.2.3