summaryrefslogtreecommitdiff
path: root/HsBot/Base
diff options
context:
space:
mode:
Diffstat (limited to 'HsBot/Base')
-rw-r--r--HsBot/Base/Env.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/HsBot/Base/Env.hs b/HsBot/Base/Env.hs
index 58b2347..36fafd5 100644
--- a/HsBot/Base/Env.hs
+++ b/HsBot/Base/Env.hs
@@ -3,7 +3,8 @@ module HsBot.Base.Env where
import HsBot.Base.Conf
import HsBot.Base.State
-type Dispatch = String -> (String -> IO ()) -> Env -> IO Env
+type SendMessage = String -> IO ()
+type Dispatch = String -> SendMessage -> Env -> IO Env
data Env = DispatchEnv State Conf Dispatch | Env State Conf
castEnv :: Env -> Env