diff options
Diffstat (limited to 'HsBot/Callbacks/StoreMessages.hs')
| -rw-r--r-- | HsBot/Callbacks/StoreMessages.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/HsBot/Callbacks/StoreMessages.hs b/HsBot/Callbacks/StoreMessages.hs index 673cc38..0a7ab4d 100644 --- a/HsBot/Callbacks/StoreMessages.hs +++ b/HsBot/Callbacks/StoreMessages.hs @@ -1,6 +1,6 @@ -module HsBot.Callbacks.StoreMessages (storeMessages) where +module HsBot.Callbacks.StoreMessages (makeStoreMessages) where -import HsBot.Callbacks.Callback +import HsBot.Callbacks.Base import HsBot.Base.Env import HsBot.Base.State @@ -9,3 +9,4 @@ storeMessages :: CallbackFunction storeMessages str sendMessage env@(Env state _) = do return (env) +makeStoreMessages = Callback 0 storeMessages |