diff options
Diffstat (limited to 'HsbotIrcBot/Main.hs')
-rw-r--r-- | HsbotIrcBot/Main.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/HsbotIrcBot/Main.hs b/HsbotIrcBot/Main.hs index 8c371bd..97e7052 100644 --- a/HsbotIrcBot/Main.hs +++ b/HsbotIrcBot/Main.hs @@ -8,6 +8,7 @@ import System.IO import Hsbot.Irc.CLI import Hsbot.Irc.Config +import Hsbot.Irc.Core -- | Main function main :: IO () @@ -26,4 +27,8 @@ main = do -- We find and parse the config file ircConfig <- getIrcConfig $ optConfigFile opts when (optDebug opts) . putStrLn $ "[hsbot-irc] Compiled config :\n" ++ (show ircConfig) + -- Finally we get into the ircbot stuff + case optDebug opts of + True -> startIrcbot opts ircConfig + False -> startIrcbot opts ircConfig -- TODO : fork process in background |