summaryrefslogtreecommitdiff
path: root/bin/tissue
diff options
context:
space:
mode:
Diffstat (limited to 'bin/tissue')
-rwxr-xr-xbin/tissue14
1 files changed, 8 insertions, 6 deletions
diff --git a/bin/tissue b/bin/tissue
index 28aa68f..36e9e3b 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -260,12 +260,14 @@ Run a web search service reading configuration from CONFIG-FILE.
(map (match-lambda
((name parameters ...)
;; Set CSS for each host.
- (call-with-current-directory (assq-ref parameters 'indexed-repository)
- (lambda ()
- (cons name
- (acons 'css
- (tissue-configuration-web-css (load-config))
- parameters))))))
+ (parameterize ((%current-git-repository
+ (repository-open
+ (string-append (assq-ref args 'state-directory)
+ "/" name "/repository"))))
+ (cons name
+ (acons 'css
+ (tissue-configuration-web-css (load-config))
+ parameters)))))
(or (assq-ref args 'hosts)
;; Assume current directory as default.
`(("localhost"