diff options
| -rw-r--r-- | src/Main.hs | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/Main.hs b/src/Main.hs index 3f2dd37..f9cd7f0 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -51,9 +51,10 @@ listenToNewResumes viewedURLs = do newAdsCount = length newResumes in do if newAdsCount > 0 - then do - putStrLn ("Got " ++ (show newAdsCount) ++ " new ads.\n") - putStrLn (concat . intersperse "\n\n" . map renderResume $ newResumes) + then + do + putStrLn ("Got " ++ (show newAdsCount) ++ " new ads.\n") + putStrLn (concat . intersperse "\n\n" . map renderResume $ newResumes) else return () waitOneMinute |