dbalan/blogng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Send body over

Browse Source
This commit is contained in:
Dhananjay Balan 2019-01-12 19:57:16 -05:00
parent 55b06f61ca
commit f90acb1140
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
site.hs
View File

@ -97,8 +97,7 @@ main = hakyllWith config $ do
route idRoute route idRoute
compile $ do compile $ do
posts <- fmap (take 5) . recentFirst =<< loadAllSnapshots "blog/*" "content" posts <- fmap (take 5) . recentFirst =<< loadAllSnapshots "blog/*" "content"
let feedCtx = postCtx `mappend` let feedCtx = postCtx `mappend` bodyField "description"
constField "description" "This is the post description"
renderAtom feedConfig feedCtx posts renderAtom feedConfig feedCtx posts
match "templates/*" $ compile templateBodyCompiler match "templates/*" $ compile templateBodyCompiler