diff options
| -rw-r--r-- | genenetwork/services/genenetwork.scm | 18 |
1 files changed, 12 insertions, 6 deletions
diff --git a/genenetwork/services/genenetwork.scm b/genenetwork/services/genenetwork.scm index bc9911e..0f2e1d6 100644 --- a/genenetwork/services/genenetwork.scm +++ b/genenetwork/services/genenetwork.scm @@ -143,13 +143,19 @@ (chown file (passwd:uid (getpw "gunicorn-gn-auth")) (passwd:gid (getpw "gunicorn-gn-auth")))) - (cons #$gn-auth-secrets - (find-files #$(dirname auth-db) - #:directories? #t))) + (append (list #$gn-auth-secrets) + (find-files #$(dirname auth-db) + #:directories? #t) + (find-files #$gn-auth-secrets + #:directories? #t))) ;; Let each service user own their own secrets files. - (chown #$gn2-secrets - (passwd:uid (getpw "gunicorn-genenetwork2")) - (passwd:gid (getpw "gunicorn-genenetwork2"))) + (for-each (lambda (file) + (chown file + (passwd:uid (getpw "gunicorn-genenetwork2")) + (passwd:gid (getpw "gunicorn-genenetwork2")))) + (append (list #$gn2-secrets) + (find-files #$gn2-secrets + #:directories? #t))) (chown #$gn3-secrets (passwd:uid (getpw "gunicorn-genenetwork3")) (passwd:gid (getpw "gunicorn-genenetwork3"))) |