diff options
| author | Teddy Wing | 2017-09-06 23:27:45 +0200 |
|---|---|---|
| committer | Teddy Wing | 2017-09-06 23:27:45 +0200 |
| commit | 712dca5f860529c33ad19e7babf5c471181e2573 (patch) | |
| tree | 35b0c86ca986d2526676a74e96e8a1a82e16a4c0 /src/Plugin/Base.hs | |
| parent | 8e5b862c9171af8af7c6c0d0456ae67a9e737633 (diff) | |
| download | sorbot-712dca5f860529c33ad19e7babf5c471181e2573.tar.bz2 | |
tmp; fix/rewordtmp
Diffstat (limited to 'src/Plugin/Base.hs')
| -rw-r--r-- | src/Plugin/Base.hs | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/Plugin/Base.hs b/src/Plugin/Base.hs index d4194ee..1ef4cd2 100644 --- a/src/Plugin/Base.hs +++ b/src/Plugin/Base.hs @@ -7,13 +7,18 @@ module Plugin.Base , defaultPlugin ) where +import Control.Monad.Trans.Class (lift) import qualified Data.Text as T import Database.SQLite.Simple +-- import Config (Config) +import Bot (Bot(Bot)) import Message -type PluginAction = Message -> IO (Either T.Text T.Text) +type PluginAction = Message -> Bot (Either T.Text T.Text) + +-- newtype Foo = Config Plugin data Plugin = Plugin { matchRegex :: String |