diff options
| author | Alexey Kreshchuk <akrsch@gmail.com> | 2013-10-18 01:23:14 +0400 |
|---|---|---|
| committer | Alexey Kreshchuk <akrsch@gmail.com> | 2013-10-18 01:23:14 +0400 |
| commit | 46b6f78da8ed814bef6972f4712d8b13e76c1122 (patch) | |
| tree | e8f0c803a4ea2e8af17289b36bf97177d531ba7f /src/Hakyll | |
| parent | 712ffa39b5857fdc5cdae1db38a177267a430b11 (diff) | |
| download | hakyll-46b6f78da8ed814bef6972f4712d8b13e76c1122.tar.gz | |
Added test case for global metadata
Diffstat (limited to 'src/Hakyll')
| -rw-r--r-- | src/Hakyll/Core/Provider/Metadata.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Core/Provider/Metadata.hs b/src/Hakyll/Core/Provider/Metadata.hs index 4331861..a54b84a 100644 --- a/src/Hakyll/Core/Provider/Metadata.hs +++ b/src/Hakyll/Core/Provider/Metadata.hs @@ -151,7 +151,7 @@ loadGlobalMetadata p fp = liftM M.fromList $ loadgm fp where -- TODO: It might be better to print warning and continue in either (error.show) (findMetadata dir) . P.parse namedMetadata path <$> readFile path findMetadata dir = - concatMap snd . filter (flip matches fp . fromGlob . combine dir . fst) + concatMap snd . filter (flip matches fp . fromGlob . normalise . combine dir . fst) namedMetadata :: Parser [(String, [(String, String)])] namedMetadata = P.many namedMetadataBlock |