[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/03: services: mympd: Require 'syslog service when configured to log t
From: |
guix-commits |
Subject: |
01/03: services: mympd: Require 'syslog service when configured to log to syslog. |
Date: |
Fri, 24 Mar 2023 11:01:39 -0400 (EDT) |
apteryx pushed a commit to branch master
in repository guix.
commit 0185b2f9b20565f2c1b9249e6f61d2a8497101cf
Author: Bruno Victal <mirai@makinata.eu>
AuthorDate: Thu Mar 23 15:02:14 2023 +0000
services: mympd: Require 'syslog service when configured to log to syslog.
* gnu/services/audio.scm (mympd-shepherd-service): Depend on 'syslog when
configured to log to syslog.
Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Modified-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
---
gnu/services/audio.scm | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/gnu/services/audio.scm b/gnu/services/audio.scm
index d55b804ba9..848da651d7 100644
--- a/gnu/services/audio.scm
+++ b/gnu/services/audio.scm
@@ -752,7 +752,11 @@ prompting a pin from the user.")
(let ((log-level* (format #f "MYMPD_LOGLEVEL=~a" log-level)))
(shepherd-service
(documentation "Run the myMPD daemon.")
- (requirement `(loopback user-processes ,@shepherd-requirement))
+ (requirement `(loopback user-processes
+ ,@(if (eq? log-to 'syslog)
+ '(syslog)
+ '())
+ ,@shepherd-requirement))
(provision '(mympd))
(start #~(begin
(let* ((pw (getpwnam #$user))