summaryrefslogtreecommitdiff
path: root/src/Text/Hakyll/Paginate.hs
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2010-03-11 12:25:49 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2010-03-11 12:25:49 +0100
commit01d8c4b330ecbc8ca52bfbe659bdecad475bd1ab (patch)
tree480e1f7494c8c2c057dbbfe1d3c371d90e060c9f /src/Text/Hakyll/Paginate.hs
parenta2c15932b713e81dcd1344f9227db2c3a65103bf (diff)
downloadhakyll-01d8c4b330ecbc8ca52bfbe659bdecad475bd1ab.tar.gz
Updated some comments.
Diffstat (limited to 'src/Text/Hakyll/Paginate.hs')
-rw-r--r--src/Text/Hakyll/Paginate.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Hakyll/Paginate.hs b/src/Text/Hakyll/Paginate.hs
index b895cbb..a1a64e4 100644
--- a/src/Text/Hakyll/Paginate.hs
+++ b/src/Text/Hakyll/Paginate.hs
@@ -34,7 +34,7 @@ defaultPaginateConfiguration = PaginateConfiguration
}
-- | The most important function for pagination. This function operates on a
--- list of renderables (the pages), and basically just adds fields to them
+-- list of @Context@s (the pages), and basically just adds fields to them
-- by combining them with a custom page.
--
-- The following metadata fields will be added:
@@ -65,7 +65,7 @@ paginate configuration renderables = paginate' Nothing renderables (1 :: Int)
Nothing -> error "No link found for pagination."
-- The main function that creates combined renderables by recursing over
- -- the list of renderables.
+ -- the list of items.
paginate' _ [] _ = []
paginate' maybePrev (x:xs) index =
let (previous, first) = case maybePrev of