summaryrefslogtreecommitdiff
path: root/fussy.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'fussy.lisp')
-rw-r--r--fussy.lisp4
1 files changed, 3 insertions, 1 deletions
diff --git a/fussy.lisp b/fussy.lisp
index a6efb55..005b26c 100644
--- a/fussy.lisp
+++ b/fussy.lisp
@@ -580,7 +580,9 @@ h1 {
(dolist (theme (a:subseq* themes
(* page +themes-per-page+)
(* (1+ page) +themes-per-page+)))
- (theme-preview-card theme)))))))))
+ (theme-preview-card theme)))
+ (when (< +themes-per-page+ (length themes))
+ (page-nav page (floor (/ (length themes) +themes-per-page+))))))))))
(lzb:defendpoint* :get "/theme/:pkg a-package:/:theme a-theme:" () ()
"The page for a particular theme showing its previews for different prog langs"