[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/03: services: mpd: Fix serialization procedure for list-of-string.
From: |
guix-commits |
Subject: |
03/03: services: mpd: Fix serialization procedure for list-of-string. |
Date: |
Sun, 5 Feb 2023 12:25:50 -0500 (EST) |
lfam pushed a commit to branch master
in repository guix.
commit 4b9e1e84585270a40cec485046ce15387405d256
Author: Bruno Victal <mirai@makinata.eu>
AuthorDate: Sun Feb 5 14:51:19 2023 +0000
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>
---
gnu/services/audio.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
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-))