Discovered the unless function.
commitc630522ec0f17fafa9b54d1c2e654580098ae5ae
authorJasper Van der Jeugt <jaspervdj@gmail.com>
dateWed 9 Dec 2009, 18:56 (17 years ago)
parent54305ea
src/Text/Hakyll/Render.hs+1−2
@@ -22,8 +22,7 @@ import Text.Hakyll.Util
2222depends :: FilePath -> [FilePath] -> IO () -> IO ()
2323depends file dependencies action = do
2424 valid <- isCacheValid (toDestination file) dependencies
25− if valid then return ()
26− else action
25+ unless valid action
2726
2827createContext :: Page -> Context
2928createContext = M.fromList . map packPair . M.toList