diff options
| author | Arun Isaac | 2023-01-27 02:22:48 +0000 |
|---|---|---|
| committer | Arun Isaac | 2023-01-27 02:24:29 +0000 |
| commit | 1da0e636d2fbe63089fe64afe3f75febe1dab17d (patch) | |
| tree | 7db1837c600001274b3603705dfe773f830cd3eb | |
| parent | 6907162006b55b4eb25a4126d79918d779e8a116 (diff) | |
| download | gn-gemtext-1da0e636d2fbe63089fe64afe3f75febe1dab17d.tar.gz | |
tissue.scm: Move css into engine parameter.
tissue 0.1.0 has deprecated the #:web-css keyword argument.
| -rw-r--r-- | tissue.scm | 10 |
1 files changed, 8 insertions, 2 deletions
@@ -1,5 +1,11 @@ (import (tissue tissue)) +(define %css + "/style.css") + +(define %engine + (html-engine #:css %css)) + (define %github-repo-uri "https://github.com/genenetwork/gn-gemtext-threads") @@ -42,7 +48,6 @@ 'web-uri (string-append "/" (string-remove-suffix ".gmi" filename)))) (gemtext-files-in-directory "topics"))) - #:web-css "/style.css" #:web-files (cons* (file "style.css" (copier "style.css")) (filter-map (lambda (filename) @@ -52,7 +57,8 @@ "README.gmi"))) (file (replace-extension filename "html") (gemtext-exporter filename - (genenetwork-gemtext-reader filename)))) + #:reader (genenetwork-gemtext-reader filename) + #:engine %engine))) ((or (string-suffix? ".jpg" filename) (string-suffix? ".png" filename) (string-suffix? ".svg" filename)) |