From 78048fcbc81521d145b79b4b47761a8b698d7ff7 Mon Sep 17 00:00:00 2001
From: Joris Guyonvarch
Date: Sun, 19 Apr 2015 12:14:50 +0200
Subject: Adding a design to the HTML mail + Adding waitInMinutes in the
 configuration

---
 src/Main.hs | 12 ------------
 1 file changed, 12 deletions(-)

(limited to 'src/Main.hs')

diff --git a/src/Main.hs b/src/Main.hs
index 82135a2..f38646b 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -19,15 +19,3 @@ main = do
       listenToNewAds config
     Nothing ->
       T.putStrLn C.configUsage
-
--- import Page
--- import Parser.Detail
-
--- main :: IO ()
--- main = do
---   eitherPage <- getPage "http://www.leboncoin.fr/locations/794858813.htm?ca=18_s"
---   case eitherPage of
---     Right page ->
---       putStrLn (show $ parseDetail page)
---     Left error ->
---       T.putStrLn error
-- 
cgit v1.2.3