summaryrefslogtreecommitdiff
path: root/gnu/services
diff options
context:
space:
mode:
authorBruno Victal <mirai@makinata.eu>2023-02-05 14:51:19 +0000
committerLeo Famulari <leo@famulari.name>2023-02-05 18:25:10 +0100
commit4b9e1e84585270a40cec485046ce15387405d256 (patch)
tree4673c68a30492bb0457d68e13c17bba6db39c074 /gnu/services
parent95ecff4289e37cf15e3d19847076a8a9d108527d (diff)
services: mpd: Fix serialization procedure for list-of-string.
This is a followup to commit 5c5f0fc1135ff15f9c4adfc5f27eadd9a592b5d1 * gnu/services/audio.scm (mpd-serialize-list-of-string): Fix serialization procedure. Signed-off-by: Leo Famulari <leo@famulari.name>
Diffstat (limited to 'gnu/services')
-rw-r--r--gnu/services/audio.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/services/audio.scm b/gnu/services/audio.scm
index 630110db2a..d55b804ba9 100644
--- a/gnu/services/audio.scm
+++ b/gnu/services/audio.scm
@@ -160,7 +160,7 @@
(define mpd-serialize-boolean mpd-serialize-field)
(define (mpd-serialize-list-of-string field-name value)
- #~(string-concatenate #$(map (cut mpd-serialize-string field-name <>) value)))
+ #~(string-append #$@(map (cut mpd-serialize-string field-name <>) value)))
(define-maybe string (prefix mpd-))
(define-maybe list-of-string (prefix mpd-))