aboutsummaryrefslogtreecommitdiff
path: root/gnu/home/services
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2023-03-16 17:29:03 +0100
committerLudovic Courtès <ludo@gnu.org>2023-03-16 17:29:03 +0100
commitc68648a8a503c59b17ec38107e7c787f3b7370f3 (patch)
treefd55c38bee9ca0cf7abfaf3b8ccfecdd4132c36a /gnu/home/services
parent6afd1fd6bccf3093c6e7b29ed816ee0d5a10c537 (diff)
downloadguix-c68648a8a503c59b17ec38107e7c787f3b7370f3.tar
guix-c68648a8a503c59b17ec38107e7c787f3b7370f3.tar.gz
home: services: znc: Remove host-side use of (shepherd support).
This is a followup to 193f547ca35eb49ef57bd9a25b67cb3965f10b03, which inadvertently pulled in (shepherd support) on the host side. * gnu/home/services/messaging.scm (home-znc-services): Change 'command' and 'log-file' to gexps. Add 'modules' field to 'shepherd-service'.
Diffstat (limited to 'gnu/home/services')
-rw-r--r--gnu/home/services/messaging.scm14
1 files changed, 4 insertions, 10 deletions
diff --git a/gnu/home/services/messaging.scm b/gnu/home/services/messaging.scm
index d403b84ac9..2f1ac4c258 100644
--- a/gnu/home/services/messaging.scm
+++ b/gnu/home/services/messaging.scm
@@ -18,11 +18,7 @@
(define-module (gnu home services messaging)
#:use-module (srfi srfi-26)
-
#:use-module (ice-9 match)
-
- #:use-module (shepherd support)
-
#:use-module (gnu home services)
#:use-module (gnu home services shepherd)
#:use-module (gnu packages messaging)
@@ -30,7 +26,6 @@
#:use-module (gnu services shepherd)
#:use-module (guix records)
#:use-module (guix gexp)
-
#:export (home-znc-configuration
home-znc-service-type))
@@ -50,14 +45,13 @@
(match config
(($ <home-znc-configuration> znc extra-options)
(let* ((znc (file-append znc "/bin/znc"))
- (command `(,znc
- "--foreground"
- ,@extra-options))
- (log-file (string-append %user-log-dir "/znc.log")))
+ (command #~'(#$znc "--foreground" #$@extra-options))
+ (log-file #~(string-append %user-log-dir "/znc.log")))
(list (shepherd-service
(documentation "Run the znc IRC bouncer.")
(provision '(znc))
- (start #~(make-forkexec-constructor '#$command
+ (modules '((shepherd support))) ;for '%user-log-dir'
+ (start #~(make-forkexec-constructor #$command
#:log-file #$log-file))
(stop #~(make-kill-destructor))))))))