diff options
| -rw-r--r-- | web/tutorials/05-snapshots-feeds.markdown | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/web/tutorials/05-snapshots-feeds.markdown b/web/tutorials/05-snapshots-feeds.markdown index 230a703..a8c06c6 100644 --- a/web/tutorials/05-snapshots-feeds.markdown +++ b/web/tutorials/05-snapshots-feeds.markdown @@ -51,7 +51,7 @@ create ["atom.xml"] $ do let feedCtx = postCtx `mappend` constField "description" "This is the post description" - posts <- take 10 . recentFirst <$> loadAll "posts/*" + posts <- fmap (take 10) . recentFirst =<< loadAll "posts/*" renderAtom myFeedConfiguration feedCtx posts ``` @@ -122,6 +122,7 @@ create ["atom.xml"] $ do route idRoute compile $ do let feedCtx = postCtx `mappend` bodyField "description" - posts <- take 10 . recentFirst <$> loadAllSnapshots "posts/*" "content" + posts <- fmap (take 10) . recentFirst =<< + loadAllSnapshots "posts/*" "content" renderAtom myFeedConfiguration feedCtx posts ``` |