diff options
| author | Arun Isaac | 2022-12-25 16:11:38 +0000 |
|---|---|---|
| committer | Arun Isaac | 2022-12-25 23:33:04 +0000 |
| commit | 0b548398336ba0922c9efe4177528563e4838b4f (patch) | |
| tree | 6183797c58baf759426d3c7166573eaf2b123b71 /tissue.scm | |
| parent | 806205382950bf3273d18872987b516f30c3d11f (diff) | |
| download | tissue-0b548398336ba0922c9efe4177528563e4838b4f.tar.gz tissue-0b548398336ba0922c9efe4177528563e4838b4f.tar.lz tissue-0b548398336ba0922c9efe4177528563e4838b4f.zip | |
tissue: Deprecate #:web-css configuration parameter.
CSS is now specified exclusively through the lexical context of
closures in the tissue configuration object.
* tissue.scm: Use (tissue web themes default).
(%css, %engine): New variables.
(tissue-configuration)[#:web-css]: Delete parameter.
[#:web-search-renderer]: Pass %css to default theme.
[#:web-files]: Pass %engine to gemtext-exporter and skribe-exporter.
* tissue/tissue.scm (<tissue-configuration>)[web-css]: Delete field.
(tissue-configuration-web-css): Delete function.
(tissue-configuration): Remove web-css argument.
Diffstat (limited to 'tissue.scm')
| -rw-r--r-- | tissue.scm | 16 |
1 files changed, 12 insertions, 4 deletions
@@ -1,3 +1,11 @@ +(use-modules (tissue web themes default)) + +(define %css + "/style.css") + +(define %engine + (html-engine #:css %css)) + (tissue-configuration #:project "tissue" #:indexed-documents (append (map (lambda (filename) @@ -11,13 +19,13 @@ (string-append "https://git.systemreboot.net/tissue/commit/?id=" (commit-hash commit)))) (commits-in-current-repository))) - #:web-css "/style.css" + #:web-search-renderer (default-theme #:css %css) #:web-files (cons* (file "index.html" - (skribe-exporter "website/index.skb")) + (skribe-exporter "website/index.skb" #:engine %engine)) (file "style.css" (copier "website/style.css")) (file "manual/dev/en/index.html" - (skribe-exporter "doc/tissue.skb")) + (skribe-exporter "doc/tissue.skb" #:engine %engine)) (append (map (lambda (font-file) (file (string-append "fonts/" font-file) (copier (string-append (getenv "GUIX_ENVIRONMENT") @@ -28,5 +36,5 @@ "IBMPlexMono-Bold-Latin1.woff2")) (filter-map (lambda (filename) (file (replace-extension filename "html") - (gemtext-exporter filename))) + (gemtext-exporter filename #:engine %engine))) (gemtext-files-in-directory "issues"))))) |