added functionality

2017-02-06 15:45:50 +01:00
parent aaf5af3319
commit 90c7c4e0cb
3 changed files with 56 additions and 6 deletions
--- a/app/Main.hs
+++ b/app/Main.hs
@ -3,4 +3,6 @@ module Main where
 import Lib

 main :: IO ()
-main = someFunc
+main = do
+        md <- readFile "test.md"
+        sequence_ $ sequence . fmap print <$> getMails md