@@ -8,7 +8,7 @@ module Hakyll.Core.Util.File
88
99import System.FilePath (normalise, takeDirectory, (</>))
1010import System.Time (ClockTime)
11−import Control.Monad (forM)
11+import Control.Monad (forM, filterM)
1212import System.Directory ( createDirectoryIfMissing, doesDirectoryExist
1313 , doesFileExist, getModificationTime
1414 , getDirectoryContents
@@ -48,7 +48,8 @@ isObsolete :: ClockTime -- ^ The time to check.
4848 -> IO Bool
4949isObsolete _ [] = return False
5050isObsolete timeStamp depends = do
51− dependsModified <- mapM getModificationTime depends
51+ depends' <- filterM doesFileExist depends
52+ dependsModified <- mapM getModificationTime depends'
5253 return (timeStamp < maximum dependsModified)
5354
5455-- | Check if a file is obsolete, given it's dependencies. When the file does