diff options
Diffstat (limited to 'website/www')
| -rw-r--r-- | website/www/packages.scm | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/website/www/packages.scm b/website/www/packages.scm index 22e4733..a109bfb 100644 --- a/website/www/packages.scm +++ b/website/www/packages.scm @@ -45,7 +45,7 @@ #:use-module (texinfo) #:use-module (texinfo html) #:export (%groups - packages-page + package-pages paginated-packages-page issues-page)) @@ -530,6 +530,16 @@ you can view " ,(html-page-footer)))) +(define* (package-pages #:optional (packages (all-packages))) + "Return a list of (FILE PAGE) tuples, where each FILE is an HTML file name +and PAGE is the corresponding SXML." + `(,@(map (lambda (group) + (list (string-append group ".html") + (paginated-packages-page packages group))) + %groups) + ("index.html" ,(paginated-packages-page packages "0-9")) + ("all.html" ,(packages-page packages)))) + (define* (issues-page #:key (checkers %issue-checkers)) `(html (@ (lang "en")) |