diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-11-09 18:13:51 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-11-09 18:13:51 +0100 |
| commit | 4cb6f9241435fae7a23a7f9fbbdab99e65285eff (patch) | |
| tree | 462f951e02579518958e15accb95be5d6d11abba /src/Hakyll/Web/Feed.hs | |
| parent | 2834fd94945ad20bf19c39957cddfdf858c0ba22 (diff) | |
| download | hakyll-4cb6f9241435fae7a23a7f9fbbdab99e65285eff.tar.gz | |
Rewrite template application
Diffstat (limited to 'src/Hakyll/Web/Feed.hs')
| -rw-r--r-- | src/Hakyll/Web/Feed.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Hakyll/Web/Feed.hs b/src/Hakyll/Web/Feed.hs index f2f3342..218f28c 100644 --- a/src/Hakyll/Web/Feed.hs +++ b/src/Hakyll/Web/Feed.hs @@ -62,7 +62,7 @@ createFeed :: Template -- ^ Feed template -> [Page String] -- ^ Items to include -> String -- ^ Resulting feed createFeed feedTemplate itemTemplate url configuration items = - pageBody $ applyTemplate feedTemplate + pageBody $ applyTemplateToPage feedTemplate $ trySetField "updated" updated $ trySetField "title" (feedTitle configuration) $ trySetField "description" (feedDescription configuration) @@ -73,7 +73,7 @@ createFeed feedTemplate itemTemplate url configuration items = $ fromBody body where -- Preprocess items - items' = flip map items $ applyTemplate itemTemplate + items' = flip map items $ applyTemplateToPage itemTemplate . trySetField "root" (feedRoot configuration) -- Body: concatenated items |