diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-12-19 23:07:28 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-12-19 23:57:19 +0100 |
commit | 831071b84fe168999a49e5987a479c847b27b3d6 (patch) | |
tree | 21c921849a37fc2458710fd05cd0bbebbbeb273d | |
parent | b17e326f1731d7170a48cfad4d9d4c91bad7b8a4 (diff) | |
download | patches-831071b84fe168999a49e5987a479c847b27b3d6.tar patches-831071b84fe168999a49e5987a479c847b27b3d6.tar.gz |
services: cuirass: Honor 'user' and 'group'.
* gnu/services/cuirass.scm (cuirass-shepherd-service): Pass the user and
group of CONFIG to 'make-forkexec-constructor'.
-rw-r--r-- | gnu/services/cuirass.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gnu/services/cuirass.scm b/gnu/services/cuirass.scm index 8e9316ffc7..c2fe9d9bf7 100644 --- a/gnu/services/cuirass.scm +++ b/gnu/services/cuirass.scm @@ -67,6 +67,8 @@ (cuirass-configuration? config) (let ((cache-directory (cuirass-configuration-cache-directory config)) (log-file (cuirass-configuration-log-file config)) + (user (cuirass-configuration-user config)) + (group (cuirass-configuration-group config)) (interval (cuirass-configuration-interval config)) (database (cuirass-configuration-database config)) (specs (cuirass-configuration-specifications config)) @@ -90,6 +92,8 @@ "--interval" #$(number->string interval) #$@(if use-substitutes? '("--use-substitutes") '()) #$@(if one-shot? '("--one-shot") '())) + #:user #$user + #:group #$group #:log-file #$log-file)) (stop #~(make-kill-destructor))))))) |