From bbb1bc28fe10f1b1fdc433ecf9502e2821f024f8 Mon Sep 17 00:00:00 2001 From: Paul Buetow Date: Sat, 15 Oct 2011 23:04:49 +0200 Subject: initial mysql support --- HsBot/Plugins/StoreMessages.hs | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) (limited to 'HsBot/Plugins/StoreMessages.hs') diff --git a/HsBot/Plugins/StoreMessages.hs b/HsBot/Plugins/StoreMessages.hs index 47aa5dd..d5f1ace 100644 --- a/HsBot/Plugins/StoreMessages.hs +++ b/HsBot/Plugins/StoreMessages.hs @@ -1,8 +1,6 @@ module HsBot.Plugins.StoreMessages (makeStoreMessages) where import Control.Exception -import Database.HDBC --- import Database.HDBC.MySQL import HsBot.Plugins.Base @@ -11,10 +9,7 @@ import HsBot.Base.State storeMessages :: CallbackFunction storeMessages str sendMessage env@(Env state _) = do - -- connectTest - return (env) + return (env) makeStoreMessages = Plugin 0 storeMessages - -connectTest = "" -- cgit v1.2.3