services: mpd: Fix serialization procedure for list-of-string.

This is a followup to commit 5c5f0fc113

* gnu/services/audio.scm (mpd-serialize-list-of-string): Fix serialization procedure.

Signed-off-by: Leo Famulari <leo@famulari.name>
This commit is contained in:
Bruno Victal 2023-02-05 14:51:19 +00:00 committed by Leo Famulari
parent 95ecff4289
commit 4b9e1e8458
No known key found for this signature in database
GPG key ID: 2646FA30BACA7F08

View file

@ -160,7 +160,7 @@ (define mpd-serialize-string mpd-serialize-field)
(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-))