summaryrefslogtreecommitdiff
path: root/src/Hakyll
diff options
context:
space:
mode:
authorJasper Van der Jeugt <m@jaspervdj.be>2014-03-26 11:28:55 +0100
committerJasper Van der Jeugt <m@jaspervdj.be>2014-03-26 12:05:38 +0100
commite5446fd4017949e1735251abed8644d90983eb3a (patch)
treec6db81e368a92881e2336eae003afdf8c48068e5 /src/Hakyll
parent3db3933b0b98dad6757558a4caf64d67d27963f4 (diff)
downloadhakyll-e5446fd4017949e1735251abed8644d90983eb3a.tar.gz
Revert "Added test case for global metadata"
This reverts commit 46b6f78da8ed814bef6972f4712d8b13e76c1122. Conflicts: tests/data/posts/metadata
Diffstat (limited to 'src/Hakyll')
-rw-r--r--src/Hakyll/Core/Provider/Metadata.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Core/Provider/Metadata.hs b/src/Hakyll/Core/Provider/Metadata.hs
index 889291f..af2dd43 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 . normalise . combine dir . fst)
+ concatMap snd . filter (flip matches fp . fromGlob . combine dir . fst)
namedMetadata :: Parser [(String, [(String, String)])]
namedMetadata = liftA2 (:) (namedMetadataBlock False) $ P.many $ namedMetadataBlock True