aboutsummaryrefslogtreecommitdiff
path: root/gnu/services
diff options
context:
space:
mode:
author宋文武 <iyzsong@gmail.com>2016-11-19 19:37:30 +0800
committer宋文武 <iyzsong@gmail.com>2016-11-19 19:37:30 +0800
commite5aade794a89a742b1f9663d42bbbfd24955718b (patch)
tree788eaca2a6866bd24ac89da93a2f61153836aa91 /gnu/services
parentae1e2133b9cb776f557ffcf2cb61888618c1d509 (diff)
downloadguix-e5aade794a89a742b1f9663d42bbbfd24955718b.tar
guix-e5aade794a89a742b1f9663d42bbbfd24955718b.tar.gz
services: dicod-service: Honor 'dicod-configuration-dico'.
* gnu/services/dict.scm (dicod-shepherd-service): Use 'dicod-configuration-dico' of config.
Diffstat (limited to 'gnu/services')
-rw-r--r--gnu/services/dict.scm20
1 files changed, 11 insertions, 9 deletions
diff --git a/gnu/services/dict.scm b/gnu/services/dict.scm
index da5d004701..303067037f 100644
--- a/gnu/services/dict.scm
+++ b/gnu/services/dict.scm
@@ -105,15 +105,17 @@ database {
(chown rundir (passwd:uid user) (passwd:gid user)))))
(define (dicod-shepherd-service config)
- (list (shepherd-service
- (provision '(dicod))
- (documentation "Run the dicod daemon.")
- (start #~(make-forkexec-constructor
- (list (string-append #$dico "/bin/dicod") "--foreground"
- (string-append
- "--config=" #$(dicod-configuration-file config)))
- #:user "dicod" #:group "dicod"))
- (stop #~(make-kill-destructor)))))
+ (let ((dicod (file-append (dicod-configuration-dico config)
+ "/bin/dicod"))
+ (dicod.conf (dicod-configuration-file config)))
+ (list (shepherd-service
+ (provision '(dicod))
+ (documentation "Run the dicod daemon.")
+ (start #~(make-forkexec-constructor
+ (list #$dicod "--foreground"
+ (string-append "--config=" #$dicod.conf))
+ #:user "dicod" #:group "dicod"))
+ (stop #~(make-kill-destructor))))))
(define dicod-service-type
(service-type