summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2022-07-05 11:19:32 +0530
committerArun Isaac2022-07-05 11:23:58 +0530
commitf7fb006708dafd14162bfc81d28ec9a9a13b95cc (patch)
tree8144836cf0ea1be35f11ce10327067b9238d755d
parent2a6a89f574bdec8464c0eb169e87b6228d98fa8a (diff)
downloadtissue-f7fb006708dafd14162bfc81d28ec9a9a13b95cc.tar.gz
tissue-f7fb006708dafd14162bfc81d28ec9a9a13b95cc.tar.lz
tissue-f7fb006708dafd14162bfc81d28ec9a9a13b95cc.zip
tissue.scm: Export issue files to HTML.
* tissue.scm (#:web-files): Export issue files to HTML.
-rw-r--r--tissue.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/tissue.scm b/tissue.scm
index 9d99a81..77cfd9c 100644
--- a/tissue.scm
+++ b/tissue.scm
@@ -3,4 +3,8 @@
#:indexed-documents (map (lambda (filename)
(indexed-document (cut read-gemtext-issue filename)
(string-append "/" (replace-extension filename "html"))))
- (gemtext-files-in-directory "issues")))
+ (gemtext-files-in-directory "issues"))
+ #:web-files (filter-map (lambda (filename)
+ (file (replace-extension filename "html")
+ (gemtext-exporter filename)))
+ (gemtext-files-in-directory "issues")))