diff options
| author | Arun Isaac | 2022-09-19 02:15:48 +0530 |
|---|---|---|
| committer | Arun Isaac | 2022-09-19 02:15:48 +0530 |
| commit | 84abb60abc0fdf509849a17e34d501bec62818e0 (patch) | |
| tree | 5ac8122bbe0b53292a19c4c67832404ab8721c8a /tissue.scm | |
| parent | ba2cde414865b86bd062591109797ac1738fb1d8 (diff) | |
| download | tissue-84abb60abc0fdf509849a17e34d501bec62818e0.tar.gz tissue-84abb60abc0fdf509849a17e34d501bec62818e0.tar.lz tissue-84abb60abc0fdf509849a17e34d501bec62818e0.zip | |
tissue.scm: Add CSS.
* website/style.css: New file. * tissue.scm (#:web-files): Copy CSS to website. (#:web-css): Use it.
Diffstat (limited to 'tissue.scm')
| -rw-r--r-- | tissue.scm | 31 |
1 files changed, 17 insertions, 14 deletions
diff --git a/tissue.scm b/tissue.scm index 711e015..f069c1e 100644 --- a/tissue.scm +++ b/tissue.scm @@ -11,17 +11,20 @@ (string-append "https://git.systemreboot.net/tissue/commit/?id=" (commit-hash commit)))) (commits-in-current-repository))) - #:web-files (cons (file "index.html" - (skribe-exporter "website/index.skb")) - (append (map (lambda (font-file) - (file (string-append "fonts/" font-file) - (copier (string-append (getenv "GUIX_ENVIRONMENT") - "/share/fonts/web/" font-file)))) - (list "IBMPlexSans-Regular-Latin1.woff2" - "IBMPlexSans-Bold-Latin1.woff2" - "IBMPlexMono-Regular-Latin1.woff2" - "IBMPlexMono-Bold-Latin1.woff2")) - (filter-map (lambda (filename) - (file (replace-extension filename "html") - (gemtext-exporter filename))) - (gemtext-files-in-directory "issues"))))) + #:web-css "/style.css" + #:web-files (cons* (file "index.html" + (skribe-exporter "website/index.skb")) + (file "style.css" + (copier "website/style.css")) + (append (map (lambda (font-file) + (file (string-append "fonts/" font-file) + (copier (string-append (getenv "GUIX_ENVIRONMENT") + "/share/fonts/web/" font-file)))) + (list "IBMPlexSans-Regular-Latin1.woff2" + "IBMPlexSans-Bold-Latin1.woff2" + "IBMPlexMono-Regular-Latin1.woff2" + "IBMPlexMono-Bold-Latin1.woff2")) + (filter-map (lambda (filename) + (file (replace-extension filename "html") + (gemtext-exporter filename))) + (gemtext-files-in-directory "issues"))))) |