diff options
| author | Bruno Victal <mirai@makinata.eu> | 2023-02-05 14:51:19 +0000 |
|---|---|---|
| committer | Leo Famulari <leo@famulari.name> | 2023-02-05 18:25:10 +0100 |
| commit | 4b9e1e84585270a40cec485046ce15387405d256 (patch) | |
| tree | 4673c68a30492bb0457d68e13c17bba6db39c074 /gnu/services | |
| parent | 95ecff4289e37cf15e3d19847076a8a9d108527d (diff) | |
| download | guix-4b9e1e84585270a40cec485046ce15387405d256.tar.gz | |
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.scm | 2 |
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-)) |