fix syndication

This commit is contained in:
nek0 2018-02-28 18:44:04 +01:00
parent 4f929b2a97
commit 246d9f703b

View file

@ -127,14 +127,14 @@ main =
create ["atom.xml"] $ do create ["atom.xml"] $ do
route idRoute route idRoute
compile $ do compile $ do
loadAllSnapshots "posts/*" "content" loadAllSnapshots "site/posts/*.md" "content"
>>= fmap (take 10) . recentFirst >>= fmap (take 10) . recentFirst
>>= renderAtom feedConf feedCtx >>= renderAtom feedConf feedCtx
create ["rss.xml"] $ do create ["rss.xml"] $ do
route idRoute route idRoute
compile $ do compile $ do
loadAllSnapshots "posts/*" "content" loadAllSnapshots "site/posts/*.md" "content"
>>= fmap (take 10) . recentFirst >>= fmap (take 10) . recentFirst
>>= renderRss feedConf feedCtx >>= renderRss feedConf feedCtx