aboutsummaryrefslogtreecommitdiff
path: root/Lazymail.hs
diff options
context:
space:
mode:
authorRaúl Benencia <rul@kalgan.cc>2013-09-05 19:36:33 -0300
committerRaúl Benencia <rul@kalgan.cc>2013-09-05 19:36:33 -0300
commit41b53ca04b6d52457f331930e8fea68416498882 (patch)
treeee63ce86ab4d9a4fc09637a0d5d4015e9f3c9956 /Lazymail.hs
parent84fa12fef1736d04ee79e40cebaadadda262f063 (diff)
New project tree structure
Diffstat (limited to 'Lazymail.hs')
-rw-r--r--Lazymail.hs22
1 files changed, 0 insertions, 22 deletions
diff --git a/Lazymail.hs b/Lazymail.hs
deleted file mode 100644
index fbb7e3e..0000000
--- a/Lazymail.hs
+++ /dev/null
@@ -1,22 +0,0 @@
-{- Lazymail monad.
- -
- - Copyright 2013 Raúl Benencia <rul@kalgan.cc>
- -
- - Licensed under the GNU GPL version 3 or higher
- -
- -}
-
-module Lazymail where
-
-import Control.Monad.Reader
-import Control.Monad.State
-
-import Config
-import State
-import Types
-
-run :: Lazymail a -> IO (a, LazymailState)
-run k =
- let config = customConfig
- state = initialState { basePath = initialPath config }
- in runStateT (runReaderT k config) state \ No newline at end of file
nihil fit ex nihilo