summaryrefslogtreecommitdiff
path: root/Hsbot/Core.hs
diff options
context:
space:
mode:
authorJulien Dessaux2011-08-08 11:39:41 +0200
committerJulien Dessaux2011-08-08 11:39:41 +0200
commit1c8cab09cb00abc3e3a0ee2e4a2d7bd6cf703d2f (patch)
tree0e580504f8cd421bf8619cf59c9dd46997a4b7b2 /Hsbot/Core.hs
parentUpdated TODO list (diff)
downloadhsbot-1c8cab09cb00abc3e3a0ee2e4a2d7bd6cf703d2f.tar.gz
hsbot-1c8cab09cb00abc3e3a0ee2e4a2d7bd6cf703d2f.tar.bz2
hsbot-1c8cab09cb00abc3e3a0ee2e4a2d7bd6cf703d2f.zip
Added access controls to hsbot.
Diffstat (limited to '')
-rw-r--r--Hsbot/Core.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/Hsbot/Core.hs b/Hsbot/Core.hs
index 11c8732..eacbe63 100644
--- a/Hsbot/Core.hs
+++ b/Hsbot/Core.hs
@@ -76,6 +76,7 @@ runHsbot = do
mapM_ (liftIO . sendStr connhdl tlsCtx . IRC.encode . IRC.joinChan) channels
-- Finally we set the new bot state
asks envBotState >>= liftIO . flip putMVar BotState { botPlugins = M.empty
+ , botAccess = configAccess config
, botHooks = []
, botChannels = channels
, botNickname = nickname }