renamed Callbacks into Plugins

git-svn-id: https://ssl.buetow.org/repos/hsbot/trunk@67 9f8f72e9-4bf4-416e-b76e-7d4203597157

1 files changed, 0 insertions, 28 deletions

diff --git a/HsBot/Callbacks.hs b/HsBot/Callbacks.hs
deleted file mode 100644
index 0bbf08f..0000000
--- a/HsBot/Callbacks.hs
+++ /dev/null
@@ -1,28 +0,0 @@
-module HsBot.Callbacks (callbacksRun) where
-
-import HsBot.Base.Env
-import HsBot.Base.State
-
-import HsBot.Callbacks.Base
-import HsBot.Callbacks.MessageCounter
-import HsBot.Callbacks.PrintMessages
-import HsBot.Callbacks.StoreMessages
-import HsBot.Callbacks.Dummy
-
-registeredCallbacks = [
-  makeMessageCounter,
-  makePrintMessages, 
-  makeStoreMessages, 
-  makeDummy
-  ]
-
-callbacksRun :: String -> SendMessage -> Env -> IO Env
-callbacksRun str sendMessage env@(Env state _) 
-	| isReady state = callbackAll registeredCallbacks env
-	| otherwise = do { putStrLn str; return (env) }
-		where
-			callbackAll [] env = return (env)
-			callbackAll (callback:restCallbacks) env = do
-				env' <- (cbFunction callback) str sendMessage env
-				callbackAll restCallbacks env'
-