diff options
| -rw-r--r-- | HsBot/Callbacks.hs | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/HsBot/Callbacks.hs b/HsBot/Callbacks.hs index 1db8f36..763289b 100644 --- a/HsBot/Callbacks.hs +++ b/HsBot/Callbacks.hs @@ -3,11 +3,17 @@ module HsBot.Callbacks (callbacksRun) where import HsBot.Base.Env import HsBot.Base.State -import HsBot.Callbacks.Dummy -import HsBot.Callbacks.PrintMessages import HsBot.Callbacks.MessageCounter +import HsBot.Callbacks.PrintMessages +import HsBot.Callbacks.StoreMessages +import HsBot.Callbacks.Dummy -registeredCallbacks = [dummy, printMessages, messageCounter] +registeredCallbacks = [ + messageCounter, + printMessages, + storeMessages, + dummy, + ] callbacksRun :: String -> SendMessage -> Env -> IO Env callbacksRun str sendMessage env@(Env state _) |