From 9d937b3b34726c24f98a0ed804e2c0c01a991ace Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Wed, 29 Jun 2022 01:30:05 +0530
Subject: tissue.scm: Replace #:issue-files with #:indexed-documents.

* tissue.scm (#:issue-files): Delete argument.
(#:indexed-documents): Add argument.
---
 tissue.scm | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

(limited to 'tissue.scm')

diff --git a/tissue.scm b/tissue.scm
index 46ea851..b6db45e 100644
--- a/tissue.scm
+++ b/tissue.scm
@@ -21,10 +21,6 @@
 
 (tissue-configuration
  #:project "GeneNetwork issue tracker"
- #:issue-files (remove (lambda (filename)
-                         (string=? (basename filename)
-                                   "README.gmi"))
-                       (gemtext-files-in-directory "issues"))
  #:aliases '(("Alexander Kabui" "Alexander" "alex" "alexk")
              ("Arun Isaac" "aruni")
              ("BonfaceKilz" "Bonface Kilz" "bonfacem")
@@ -36,6 +32,14 @@
              ("Arthur Centeno" "acenteno")
              ("jgart")
              ("Zachary Sloan" "zach" "zachs" "zsloan"))
+ #:indexed-documents (append (map (lambda (filename)
+                                    (indexed-document (cut read-gemtext-issue filename)
+                                                      (string-append "/" (replace-extension filename "html"))))
+                                  (gemtext-files-in-directory "issues"))
+                             (map (lambda (filename)
+                                    (indexed-document (cut read-gemtext-document filename)
+                                                      (string-append "/" (replace-extension filename "html"))))
+                                  (gemtext-files-in-directory "topics")))
  #:web-css "/style.css"
  #:web-files (cons* (file "style.css"
                           (copier "style.css"))
-- 
cgit v1.2.3