diff options
Diffstat (limited to 'HsBot')
| -rw-r--r-- | HsBot/Plugins.hs | 14 |
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' |