diff options
author | Jasper Van der Jeugt <m@jaspervdj.be> | 2013-11-18 12:42:21 +0100 |
---|---|---|
committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2013-11-18 12:42:21 +0100 |
commit | f9a8443d68e5dec50bb2b11315f27befb535389f (patch) | |
tree | 6ea98279a43265721e26873e1890d86d998330ae /src/Hakyll/Core/Provider/Internal.hs | |
parent | c1459daf371c5f85ce9ae0dd9bc36b216ba6eb24 (diff) | |
download | hakyll-f9a8443d68e5dec50bb2b11315f27befb535389f.tar.gz |
Detect change if metadata file is deleted
Closes #191
Diffstat (limited to 'src/Hakyll/Core/Provider/Internal.hs')
-rw-r--r-- | src/Hakyll/Core/Provider/Internal.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Hakyll/Core/Provider/Internal.hs b/src/Hakyll/Core/Provider/Internal.hs index d566f3a..fdf1342 100644 --- a/src/Hakyll/Core/Provider/Internal.hs +++ b/src/Hakyll/Core/Provider/Internal.hs @@ -174,7 +174,9 @@ resourceModified :: Provider -> Identifier -> Bool resourceModified p r = case (ri, oldRi) of (Nothing, _) -> False (Just _, Nothing) -> True - (Just n, Just o) -> resourceInfoModified n > resourceInfoModified o + (Just n, Just o) -> + resourceInfoModified n > resourceInfoModified o || + resourceInfoMetadata n /= resourceInfoMetadata o where normal = setVersion Nothing r ri = M.lookup normal (providerFiles p) |