diff options
| -rw-r--r-- | HsBot/Callbacks/StoreMessages.hs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/HsBot/Callbacks/StoreMessages.hs b/HsBot/Callbacks/StoreMessages.hs new file mode 100644 index 0000000..b5d043a --- /dev/null +++ b/HsBot/Callbacks/StoreMessages.hs @@ -0,0 +1,9 @@ +module HsBot.Callbacks.StoreMessages (storeMessages) where + +import HsBot.Base.Env +import HsBot.Base.State + +storeMessages :: String -> SendMessage -> Env -> IO Env +storeMessages str sendMessage env@(Env state _) = do + return (env) + |