diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2014-10-27 12:20:31 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2014-10-27 12:20:31 +0100 |
| commit | 59b6f01218eb2fbd36cb9fec6a3413093171ccda (patch) | |
| tree | c2cdb693c03639bf02ef79c7336e911e4aa58d06 /src/Hakyll/Core/Util | |
| parent | 8bc18c7fd64fe5c0354c3ac9a4cd12bf3a46cb17 (diff) | |
| download | hakyll-59b6f01218eb2fbd36cb9fec6a3413093171ccda.tar.gz | |
Better functions in templates
Diffstat (limited to 'src/Hakyll/Core/Util')
| -rw-r--r-- | src/Hakyll/Core/Util/Parser.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Core/Util/Parser.hs b/src/Hakyll/Core/Util/Parser.hs index 25494bd..c5789ed 100644 --- a/src/Hakyll/Core/Util/Parser.hs +++ b/src/Hakyll/Core/Util/Parser.hs @@ -16,7 +16,7 @@ import Text.Parsec.String (Parser) -------------------------------------------------------------------------------- metadataKey :: Parser String metadataKey = do - i <- (:) <$> P.letter <*> (P.many $ P.alphaNum <|> P.oneOf " _-.") + i <- (:) <$> P.letter <*> (P.many $ P.alphaNum <|> P.oneOf "_-.") if i `elem` reservedKeys then mzero else return i |