diff options
Diffstat (limited to '')
-rw-r--r-- | Hsbot/Core.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/Hsbot/Core.hs b/Hsbot/Core.hs index fac9f8e..025e0c5 100644 --- a/Hsbot/Core.hs +++ b/Hsbot/Core.hs @@ -17,18 +17,18 @@ import Hsbot.Plugin import Hsbot.Types -- | Bot's main entry point -hsbot :: Config -> IO () +hsbot :: [BotConfig] -> IO () hsbot config = do startTime <- getCurrentTime putStrLn "[Hsbot] Opening communication channel... " chan <- newChan :: IO (Chan BotMsg) mvar <- newMVar M.empty :: IO (MVar BotResumeData) putStrLn "[Hsbot] Spawning IrcBot plugins... " - botState <- execStateT spawnIrcPlugins BotState { botStartTime = startTime - , botPlugins = M.empty - , botChan = chan - , botConfig = config - , botResumeData = mvar } + botState <- execStateT spawnPlugins BotState { botStartTime = startTime + , botPlugins = M.empty + , botChan = chan + , botConfig = config + , botResumeData = mvar } putStrLn "[Hsbot] Entering main loop... " (status, botState') <- runLoop botState putStrLn "[Hsbot] Killing active plugins... " |