diff options
author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2023-04-29 12:02:48 -0400 |
---|---|---|
committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2023-07-26 10:40:16 -0400 |
commit | 0db2fa1ac081f684eb15e4ef8561f6e2853527bd (patch) | |
tree | 3103c373b90bec6be6fbf09676bff5aae1cb100f | |
parent | 131746885ccd050c4a440d2129aea5bfa86c29e2 (diff) | |
download | guix-0db2fa1ac081f684eb15e4ef8561f6e2853527bd.tar.gz |
services: mpd: Do not rotate logs when using syslog.
* gnu/services/audio.scm (mpd-log-rotation): Conditionlize based on the value of LOG-FILE.
-rw-r--r-- | gnu/services/audio.scm | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/gnu/services/audio.scm b/gnu/services/audio.scm index f3c8fae23c..8a127d234b 100644 --- a/gnu/services/audio.scm +++ b/gnu/services/audio.scm @@ -581,12 +581,15 @@ appended to the configuration.") (serialize-configuration configuration mpd-configuration-fields))) (define (mpd-log-rotation config) - (match-record config <mpd-configuration> (log-file) - (log-rotation - (files (list log-file)) - (post-rotate #~(begin - (use-modules (gnu services herd)) - (with-shepherd-action 'mpd ('reopen) #f)))))) + (match-record config <mpd-configuration> + (log-file) + (if (string=? "syslog" log-file) + '() ;nothing to do + (list (log-rotation + (files (list log-file)) + (post-rotate #~(begin + (use-modules (gnu services herd)) + (with-shepherd-action 'mpd ('reopen) #f)))))))) (define (mpd-shepherd-service config) (match-record config <mpd-configuration> @@ -674,10 +677,8 @@ MPD (PID ~a)." pid)) (extensions (list (service-extension shepherd-root-service-type (compose list mpd-shepherd-service)) - (service-extension account-service-type - mpd-accounts) - (service-extension rottlog-service-type - (compose list mpd-log-rotation)))) + (service-extension account-service-type mpd-accounts) + (service-extension rottlog-service-type mpd-log-rotation))) (default-value (mpd-configuration)))) |