bin: Pass along entire project configuration object to servers.

Themes should be free to access the entirety of the project
configuration. It is impossible to predict which parts of the project
configuration they will need.

* bin/tissue (tissue-web, tissue-web-dev): Pass entire configuration
object to start-web-server and start-dev-web-server respectively.
* tissue/web/dev.scm: Import (tissue tissue).
(handler, start-dev-web-server): Accept entire configuration object.
* tissue/web/server.scm: Import (tissue tissue).
(search-handler, start-web-server): Accept entire configuration
object.

1 files changed, 2 insertions, 3 deletions

diff --git a/bin/tissue b/bin/tissue
index 2c05552..47c9c6f 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -278,7 +278,7 @@ Serve repositories specified in CONFIG-FILE over HTTP.
                                    (parameterize ((%current-git-repository
                                                    (repository-open repository-directory)))
                                      (cons name
-                                           `((css . ,(tissue-configuration-web-css (load-config)))
+                                           `((project . ,(load-config))
                                              (repository-directory . ,repository-directory)
                                              (website-directory . ,(string-append state-directory "/" name "/website"))
                                              (xapian-directory . ,(string-append state-directory "/" name "/xapian"))
@@ -311,8 +311,7 @@ Serve website and issues of current repository.
          (start-repl (assq-ref args 'listen-repl)))
        (start-dev-web-server (assq-ref args 'port)
                              %xapian-index
-                             (tissue-configuration-web-css (load-config))
-                             (tissue-configuration-web-files (load-config)))))))
+                             (load-config))))))
 
 (define (print-usage)
   (format #t "Usage: ~a COMMAND [OPTIONS] [ARGS]