summaryrefslogtreecommitdiff
path: root/HsBot/Plugins/StoreMessages.hs
diff options
context:
space:
mode:
authorpb <pb@9f8f72e9-4bf4-416e-b76e-7d4203597157>2010-05-16 11:22:45 +0000
committerpb <pb@9f8f72e9-4bf4-416e-b76e-7d4203597157>2010-05-16 11:22:45 +0000
commitbac4cf701291470d3495bc12801ed6ad3dcc663a (patch)
treef1c205894c31c954e32bcf3e429762e0f73961b1 /HsBot/Plugins/StoreMessages.hs
parentd7cbae84a064fe2b9288eb0844b3d2e90f6df8e6 (diff)
some small changes
git-svn-id: https://ssl.buetow.org/repos/hsbot/trunk@71 9f8f72e9-4bf4-416e-b76e-7d4203597157
Diffstat (limited to 'HsBot/Plugins/StoreMessages.hs')
-rw-r--r--HsBot/Plugins/StoreMessages.hs8
1 files changed, 8 insertions, 0 deletions
diff --git a/HsBot/Plugins/StoreMessages.hs b/HsBot/Plugins/StoreMessages.hs
index a0033f7..47aa5dd 100644
--- a/HsBot/Plugins/StoreMessages.hs
+++ b/HsBot/Plugins/StoreMessages.hs
@@ -1,5 +1,9 @@
module HsBot.Plugins.StoreMessages (makeStoreMessages) where
+import Control.Exception
+import Database.HDBC
+-- import Database.HDBC.MySQL
+
import HsBot.Plugins.Base
import HsBot.Base.Env
@@ -7,6 +11,10 @@ import HsBot.Base.State
storeMessages :: CallbackFunction
storeMessages str sendMessage env@(Env state _) = do
+ -- connectTest
return (env)
makeStoreMessages = Plugin 0 storeMessages
+
+
+connectTest = ""