summaryrefslogtreecommitdiff
path: root/HsBot
diff options
context:
space:
mode:
authorpb <pb@9f8f72e9-4bf4-416e-b76e-7d4203597157>2010-05-15 18:12:50 +0000
committerpb <pb@9f8f72e9-4bf4-416e-b76e-7d4203597157>2010-05-15 18:12:50 +0000
commit65503932a10e1fba9b92736add48e5f873807705 (patch)
tree6a01affc0271b6742e15eed3c6b1d08e642e8927 /HsBot
parentc675c92a06761d6b28f8fdda8cc418b64a040c9a (diff)
formatted the source code.
git-svn-id: https://ssl.buetow.org/repos/hsbot/trunk@68 9f8f72e9-4bf4-416e-b76e-7d4203597157
Diffstat (limited to 'HsBot')
-rw-r--r--HsBot/Plugins.hs14
1 files changed, 7 insertions, 7 deletions
diff --git a/HsBot/Plugins.hs b/HsBot/Plugins.hs
index 28e1de2..2fa337c 100644
--- a/HsBot/Plugins.hs
+++ b/HsBot/Plugins.hs
@@ -18,11 +18,11 @@ registeredPlugins = [
pluginsTrigger :: String -> SendMessage -> Env -> IO Env
pluginsTrigger str sendMessage env@(Env state _)
- | isReady state = pluginsAll registeredPlugins env
- | otherwise = do { putStrLn str; return (env) }
- where
- pluginsAll [] env = return (env)
- pluginsAll (plugin:restPlugins) env = do
- env' <- (cbFunction plugin) str sendMessage env
- pluginsAll restPlugins env'
+ | isReady state = pluginsAll registeredPlugins env
+ | otherwise = do { putStrLn str; return (env) }
+ where
+ pluginsAll [] env = return (env)
+ pluginsAll (plugin:restPlugins) env = do
+ env' <- (cbFunction plugin) str sendMessage env
+ pluginsAll restPlugins env'