jmd pushed a commit to branch wip-installer
in repository guix.
commit 3ad006c453890ca1238c59bb8fdc4f120509798f
Author: Ludovic Courtès <[email protected]>
Date: Mon Dec 19 23:07:28 2016 +0100
services: cuirass: Honor 'user' and 'group'.
* gnu/services/cuirass.scm (cuirass-shepherd-service): Pass the user and
group of CONFIG to 'make-forkexec-constructor'.
---
gnu/services/cuirass.scm | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/gnu/services/cuirass.scm b/gnu/services/cuirass.scm
index 8e9316f..c2fe9d9 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)))))))
