From c675c92a06761d6b28f8fdda8cc418b64a040c9a Mon Sep 17 00:00:00 2001
From: pb <pb@9f8f72e9-4bf4-416e-b76e-7d4203597157>
Date: Sat, 15 May 2010 18:03:15 +0000
Subject: renamed Callbacks into Plugins

git-svn-id: https://ssl.buetow.org/repos/hsbot/trunk@67 9f8f72e9-4bf4-416e-b76e-7d4203597157
---
 HsBot/Callbacks/MessageCounter.hs | 16 ----------------
 1 file changed, 16 deletions(-)
 delete mode 100644 HsBot/Callbacks/MessageCounter.hs

(limited to 'HsBot/Callbacks/MessageCounter.hs')

diff --git a/HsBot/Callbacks/MessageCounter.hs b/HsBot/Callbacks/MessageCounter.hs
deleted file mode 100644
index 18f6dba..0000000
--- a/HsBot/Callbacks/MessageCounter.hs
+++ /dev/null
@@ -1,16 +0,0 @@
-module HsBot.Callbacks.MessageCounter (makeMessageCounter) where
-
-import HsBot.Callbacks.Base
-
-import HsBot.Base.Env
-import HsBot.Base.State
-
-import HsBot.IRC.User
-
-update user = user { userMessages = 1 + userMessages user }
-
-messageCounter :: CallbackFunction
-messageCounter str sendMessage (Env state conf) = do
-   return (Env (stateUpdateUser state (currentSender state) update) conf)
-
-makeMessageCounter = Callback 0 messageCounter
-- 
cgit v1.2.3