summary refs log tree commit diff
path: root/tissue.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tissue.scm')
-rw-r--r--tissue.scm16
1 files changed, 12 insertions, 4 deletions
diff --git a/tissue.scm b/tissue.scm
index da88795..dc525ca 100644
--- a/tissue.scm
+++ b/tissue.scm
@@ -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")))))