From 1d6e13ef4e50ae53c52b2ce289881a071ecf942e Mon Sep 17 00:00:00 2001 From: pb Date: Sat, 15 May 2010 16:01:30 +0000 Subject: added the PrintMessages callback. git-svn-id: https://ssl.buetow.org/repos/hsbot/trunk@58 9f8f72e9-4bf4-416e-b76e-7d4203597157 --- HsBot/Callbacks.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'HsBot/Callbacks.hs') diff --git a/HsBot/Callbacks.hs b/HsBot/Callbacks.hs index d15d89b..1db8f36 100644 --- a/HsBot/Callbacks.hs +++ b/HsBot/Callbacks.hs @@ -4,9 +4,10 @@ import HsBot.Base.Env import HsBot.Base.State import HsBot.Callbacks.Dummy +import HsBot.Callbacks.PrintMessages import HsBot.Callbacks.MessageCounter -registeredCallbacks = [dummy, messageCounter] +registeredCallbacks = [dummy, printMessages, messageCounter] callbacksRun :: String -> SendMessage -> Env -> IO Env callbacksRun str sendMessage env@(Env state _) -- cgit v1.2.3