aboutsummaryrefslogtreecommitdiff
path: root/scripts/guix-data-service.in
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/guix-data-service.in')
-rw-r--r--scripts/guix-data-service.in10
1 files changed, 9 insertions, 1 deletions
diff --git a/scripts/guix-data-service.in b/scripts/guix-data-service.in
index e8b35b5..d91b659 100644
--- a/scripts/guix-data-service.in
+++ b/scripts/guix-data-service.in
@@ -25,6 +25,7 @@
(use-modules (srfi srfi-1)
(srfi srfi-37)
+ (ice-9 textual-ports)
(system repl server)
(guix-data-service config)
(guix-data-service web server))
@@ -49,6 +50,12 @@
(alist-cons 'pid-file
arg
result)))
+ (option '("secret-key-base-file") #t #f
+ (lambda (opt name arg result)
+ (alist-cons 'secret-key-base
+ (string-trim-right
+ (call-with-input-file arg get-string-all))
+ result)))
(option '("update-database") #f #f
(lambda (opt name _ result)
(alist-cons 'update-database #t result)))
@@ -123,4 +130,5 @@
(assq-ref opts 'port))
(start-guix-data-service-web-server (assq-ref opts 'port)
- (assq-ref opts 'host)))
+ (assq-ref opts 'host)
+ (assq-ref opts 'secret-key-base)))