diff options
Diffstat (limited to 'jakob/utils/pagination.scm')
| -rw-r--r-- | jakob/utils/pagination.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/jakob/utils/pagination.scm b/jakob/utils/pagination.scm index 9e7bd47..9e6ff13 100644 --- a/jakob/utils/pagination.scm +++ b/jakob/utils/pagination.scm @@ -63,7 +63,7 @@ lists of the form (index, items)." #:key enable-search) "Return an SHTML document showing CONTENT, with the header TITLE and links to PREVIOUS-PAGE and NEXT-PAGE." - #<((h1 ,title) + #<((h2 (@ (class "section-header")) ,title) ,@(if enable-search '((div (@ (id "search")))) '()) @@ -106,7 +106,7 @@ the item from ITEMS passed as a parameter." ((index subset) (let ((title (if (= index 1) base-title - (format #f "~a — Page ~a" base-title index))) + (format #f "~a :: Page ~a" base-title index))) (previous-page (if (>= (1- index) 1) (index->file-name (1- index)) #f)) |