From 2a6a89f574bdec8464c0eb169e87b6228d98fa8a Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Tue, 5 Jul 2022 11:15:41 +0530 Subject: tissue: Deprecate tag listings configuration. * tissue/tissue.scm ()[web-tags-path]: Delete field. * tissue/tissue.scm (tissue-configuration): Remove web-tags-path argument. * tissue/web/static.scm (build-website): Remove tags-path documentation in docstring. --- tissue/tissue.scm | 11 +++-------- tissue/web/static.scm | 4 ---- 2 files changed, 3 insertions(+), 12 deletions(-) diff --git a/tissue/tissue.scm b/tissue/tissue.scm index 870148f..2fdd2ac 100644 --- a/tissue/tissue.scm +++ b/tissue/tissue.scm @@ -27,19 +27,17 @@ tissue-configuration-aliases tissue-configuration-indexed-documents tissue-configuration-web-css - tissue-configuration-web-tags-path tissue-configuration-web-files gemtext-files-in-directory)) (define-record-type (make-tissue-configuration project aliases indexed-documents - web-css web-tags-path web-files) + web-css web-files) tissue-configuration? (project tissue-configuration-project) (aliases tissue-configuration-aliases) (indexed-documents tissue-configuration-indexed-documents) (web-css tissue-configuration-web-css) - (web-tags-path tissue-configuration-web-tags-path) (web-files delayed-tissue-configuration-web-files)) (define tissue-configuration-web-files @@ -66,7 +64,7 @@ which directory they are in." #'(args ...)))) #`(apply (lambda* (#:key project (aliases '()) (indexed-documents '()) - web-css (web-tags-path "/tags") (web-files (delay '()))) + web-css (web-files (delay '()))) "PROJECT is the name of the project. It is used in the title of the generated web pages, among other places. @@ -81,12 +79,9 @@ WEB-CSS is the path to a CSS stylesheet. It is relative to the document root and must begin with a /. If it is #f, no stylesheet is used in the generated web pages. -WEB-TAGS-PATH is the path relative to the document root where the -per-tag issue listings are put. It must begin with a /. - WEB-FILES is a list of objects representing files to be written to the web output." - (make-tissue-configuration project aliases indexed-documents web-css web-tags-path web-files)) + (make-tissue-configuration project aliases indexed-documents web-css web-files)) (list #,@(append before (syntax-case after () ((web-files-key web-files rest ...) diff --git a/tissue/web/static.scm b/tissue/web/static.scm index 1937850..90496cc 100644 --- a/tissue/web/static.scm +++ b/tissue/web/static.scm @@ -117,10 +117,6 @@ as a website. CSS is the path to a CSS stylesheet. If it is #f, no stylesheet is included in the generated web pages. -TAGS-PATH is the path relative to the document root where the per-tag -issue listings are put. It must begin with a /. If it is #f, per-tag -issue listings are not generated. - FILES is a list of objects representing files to be written to the web output. -- cgit v1.2.3