diff options
Diffstat (limited to 'src/Text/Hakyll.hs')
| -rw-r--r-- | src/Text/Hakyll.hs | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/Text/Hakyll.hs b/src/Text/Hakyll.hs index d34c1c8..7c74b2e 100644 --- a/src/Text/Hakyll.hs +++ b/src/Text/Hakyll.hs @@ -28,10 +28,11 @@ build buildFunction = do putStrLn "Generating..." clean :: IO () clean = do remove' "_cache" remove' "_site" - where remove' dir = do putStrLn $ "Removing " ++ dir ++ "..." - exists <- doesDirectoryExist dir - if exists then removeDirectoryRecursive dir - else return () + where + remove' dir = do putStrLn $ "Removing " ++ dir ++ "..." + exists <- doesDirectoryExist dir + if exists then removeDirectoryRecursive dir + else return () -- | Show usage information. help :: IO () |