diff options
| author | Joris Guyonvarch | 2015-04-11 14:20:02 +0200 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-04-11 14:20:02 +0200 |
| commit | 88b7f848da3515d67cfb989b98ad5285a037993e (patch) | |
| tree | 06dec94cfcdf1c7f0fd44a80111b2cc762d782fd /src | |
| parent | 9f389a05cc883213327b8d17db6d23c3ff8fb4e1 (diff) | |
| download | ad-listener-88b7f848da3515d67cfb989b98ad5285a037993e.tar.gz ad-listener-88b7f848da3515d67cfb989b98ad5285a037993e.tar.bz2 ad-listener-88b7f848da3515d67cfb989b98ad5285a037993e.zip | |
Fixing bad indentation
Diffstat (limited to 'src')
| -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 |