summaryrefslogtreecommitdiff
path: root/tissue.scm
diff options
context:
space:
mode:
authorArun Isaac2022-06-29 01:30:05 +0530
committerArun Isaac2022-06-29 01:30:05 +0530
commit9d937b3b34726c24f98a0ed804e2c0c01a991ace (patch)
tree265e5e15309e55a7f01d8697f65e561b415cdb81 /tissue.scm
parent2c7e45c44b57a124af38cdb87e376f8a956c496c (diff)
downloadgn-gemtext-9d937b3b34726c24f98a0ed804e2c0c01a991ace.tar.gz
tissue.scm: Replace #:issue-files with #:indexed-documents.
* tissue.scm (#:issue-files): Delete argument. (#:indexed-documents): Add argument.
Diffstat (limited to 'tissue.scm')
-rw-r--r--tissue.scm12
1 files changed, 8 insertions, 4 deletions
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"))