From b9c8e4d404c444d57fe7320c25ba0654d9c5193c Mon Sep 17 00:00:00 2001
From: Julien Dessaux
Date: Thu, 6 Aug 2009 00:11:14 +0200
Subject: Added IRC connection and initialisation stuff.

---
 Hsbot/Main.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'Hsbot/Main.hs')

diff --git a/Hsbot/Main.hs b/Hsbot/Main.hs
index 129d2bd..5ff138b 100644
--- a/Hsbot/Main.hs
+++ b/Hsbot/Main.hs
@@ -2,7 +2,6 @@ module Hsbot.Main
     (imain
     ) where
 
-import Network
 import System.IO
 import System.Plugins
 
@@ -19,5 +18,7 @@ imain modul' reboot = imain' modul' reboot newbot
 -- | Bot's main entry point
 imain' :: Module -> Reboot -> Bot -> IO ()
 imain' modul' reboot bot = do
-    print C.config
+    servers' <- mapM connectServer (ircServers C.config)
+    mapM_ initServer servers'
+    return ()
 
-- 
cgit v1.2.3