aboutsummaryrefslogtreecommitdiff
path: root/genenetwork/services/genenetwork.scm
diff options
context:
space:
mode:
authorArun Isaac2024-03-01 11:28:58 +0000
committerArun Isaac2024-03-01 11:32:41 +0000
commit1dc59cdfeeaebdbfe58a4cf7c8a72795e61bbc6a (patch)
tree8077df041ac2f9a104f3b5b1be2de45f08b80f76 /genenetwork/services/genenetwork.scm
parentc032c737b5d2d791d388618e3c79403d3a16fe21 (diff)
downloadgn-machines-1dc59cdfeeaebdbfe58a4cf7c8a72795e61bbc6a.tar.gz
Set ownership of secrets files.
* genenetwork/services/genenetwork.scm (genenetwork-activation): Set ownership of secrets files. * production-deploy.sh: Mount secrets files read-write.
Diffstat (limited to 'genenetwork/services/genenetwork.scm')
-rw-r--r--genenetwork/services/genenetwork.scm9
1 files changed, 6 insertions, 3 deletions
diff --git a/genenetwork/services/genenetwork.scm b/genenetwork/services/genenetwork.scm
index f5d1e01..5a2dda2 100644
--- a/genenetwork/services/genenetwork.scm
+++ b/genenetwork/services/genenetwork.scm
@@ -100,7 +100,7 @@
(define (genenetwork-activation config)
(match-record config <genenetwork-configuration>
- (auth-db)
+ (gn2-secrets gn3-secrets gn-auth-secrets auth-db)
(with-imported-modules '((guix build utils))
#~(begin
(use-modules (guix build utils))
@@ -109,8 +109,11 @@
(chown file
(passwd:uid (getpw "genenetwork"))
(passwd:gid (getpw "genenetwork"))))
- (find-files #$(dirname auth-db)
- #:directories? #t))))))
+ (cons* #$gn2-secrets
+ #$gn3-secrets
+ #$gn-auth-secrets
+ (find-files #$(dirname auth-db)
+ #:directories? #t)))))))
(define (configuration-file-gexp alist)
"Return a G-expression that constructs a configuration file of