summaryrefslogtreecommitdiff
path: root/src/Text/Hakyll
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2009-12-09 18:56:48 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2009-12-09 18:56:48 +0100
commitc630522ec0f17fafa9b54d1c2e654580098ae5ae (patch)
tree40775440bcbd786d576e360f0b9e0c3f95342994 /src/Text/Hakyll
parent54305ea4b97a8bdafc34ae9917c2e73ecada0302 (diff)
downloadhakyll-c630522ec0f17fafa9b54d1c2e654580098ae5ae.tar.gz
Discovered the unless function.
Diffstat (limited to 'src/Text/Hakyll')
-rw-r--r--src/Text/Hakyll/Render.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Text/Hakyll/Render.hs b/src/Text/Hakyll/Render.hs
index c611a88..7c52d9b 100644
--- a/src/Text/Hakyll/Render.hs
+++ b/src/Text/Hakyll/Render.hs
@@ -22,8 +22,7 @@ import Text.Hakyll.Util
depends :: FilePath -> [FilePath] -> IO () -> IO ()
depends file dependencies action = do
valid <- isCacheValid (toDestination file) dependencies
- if valid then return ()
- else action
+ unless valid action
createContext :: Page -> Context
createContext = M.fromList . map packPair . M.toList