aboutsummaryrefslogtreecommitdiff
path: root/hakyll
diff options
context:
space:
mode:
authorEuAndreh <eu@euandre.org>2020-01-25 14:53:20 -0300
committerEuAndreh <eu@euandre.org>2020-01-25 14:53:20 -0300
commitab3ce4a60e64afb612dd3cce56d8b99e07d4e7cc (patch)
treea82b1e3a09ccc5905f0c61e8e44e32db82604f77 /hakyll
parentFix copied public-inbox mailing list address (diff)
downloadeuandre.org-ab3ce4a60e64afb612dd3cce56d8b99e07d4e7cc.tar.gz
euandre.org-ab3ce4a60e64afb612dd3cce56d8b99e07d4e7cc.tar.xz
Main.hs: Don't limit Atom and RSS feeds to 10 items
Diffstat (limited to 'hakyll')
-rw-r--r--hakyll/Main.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/hakyll/Main.hs b/hakyll/Main.hs
index 90e6b0b..d84cf40 100644
--- a/hakyll/Main.hs
+++ b/hakyll/Main.hs
@@ -80,7 +80,7 @@ main = hakyll $ do
route idRoute
compile $ do
loadAllSnapshots "posts/*" "content"
- >>= fmap (take 10) . recentFirst
+ >>= recentFirst
>>= renderAtom feedConfiguration feedCtx
create ["rss.xml"] $ do
@@ -89,7 +89,7 @@ main = hakyll $ do
let feedCtx = postCtx `mappend`
constField "description" "This is the post description"
- posts <- fmap (take 10) . recentFirst =<< loadAll "posts/*"
+ posts <- recentFirst =<< loadAll "posts/*"
renderRss feedConfiguration feedCtx posts
match "templates/*" $ compile templateBodyCompiler