From d80cee1ecddeb75e54de767c35f04a9a004eed12 Mon Sep 17 00:00:00 2001 From: pb Date: Sat, 15 May 2010 17:26:52 +0000 Subject: * renamed HsBot.Callbacks.Callback into HsBot.Callbacks.Base * all callbacks are now stored in the datatype Callback. git-svn-id: https://ssl.buetow.org/repos/hsbot/trunk@66 9f8f72e9-4bf4-416e-b76e-7d4203597157 --- HsBot/Base.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'HsBot/Base.hs') diff --git a/HsBot/Base.hs b/HsBot/Base.hs index 8f6d099..1c3d4a4 100644 --- a/HsBot/Base.hs +++ b/HsBot/Base.hs @@ -18,7 +18,7 @@ startBase = do state' <- state -- Extract State from the IO Monad ircStart (DispatchEnv state' conf dispatch) -dispatch :: Dispatch +dispatch :: DispatchFunction dispatch msg sendMessage env@(Env state conf) = dispatch' msg where dispatch' ('!':_) = -- cgit v1.2.3