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 | |
| parent | c1459daf371c5f85ce9ae0dd9bc36b216ba6eb24 (diff) | |
| download | hakyll-f9a8443d68e5dec50bb2b11315f27befb535389f.tar.gz | |
Detect change if metadata file is deleted
Closes #191
| -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) |