diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2013-08-16 11:48:05 +0200 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2013-08-16 11:48:26 +0200 |
| commit | 5679681ac15de8b3b7d1cc0db6745f6787141e23 (patch) | |
| tree | 709bb47c6698f8eca5930f24aa061272ac870b73 /src/Hakyll/Web/Template/Context.hs | |
| parent | 64569d7b724add2c30ee233a1b73703d0e25a8f0 (diff) | |
| download | hakyll-5679681ac15de8b3b7d1cc0db6745f6787141e23.tar.gz | |
Change type: metadataField :: Context a
Closes #175
Diffstat (limited to 'src/Hakyll/Web/Template/Context.hs')
| -rw-r--r-- | src/Hakyll/Web/Template/Context.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Web/Template/Context.hs b/src/Hakyll/Web/Template/Context.hs index 98662dd..cd52eb0 100644 --- a/src/Hakyll/Web/Template/Context.hs +++ b/src/Hakyll/Web/Template/Context.hs @@ -130,7 +130,7 @@ bodyField key = field key $ return . itemBody -------------------------------------------------------------------------------- -- | Map any field to its metadata value, if present -metadataField :: Context String +metadataField :: Context a metadataField = Context $ \k i -> do value <- getMetadataField (itemIdentifier i) k maybe empty (return . StringField) value |