summary refs log tree commit diff
diff options
context:
space:
mode:
authorAlexey Abramov <levenson@mmer.org>2021-02-17 20:43:59 +0100
committerLudovic Courtès <ludo@gnu.org>2021-04-06 23:59:47 +0200
commit5a6e27bfbdf04bb4555b49fd06766266807a3092 (patch)
tree19a53bb063d99e98dbabd6311808ffa5a24b4de3
parent66d8dc3d745442efdfe13decdff6bde748fb4c53 (diff)
downloadguix-5a6e27bfbdf04bb4555b49fd06766266807a3092.tar.gz
services: dovecot: Fix serialization of a free-form-args arguments.
* gnu/services/mail.scm (serialize-free-form-args): Change destination and
return a string containing the formated text.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
-rw-r--r--gnu/services/mail.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/services/mail.scm b/gnu/services/mail.scm
index c0f6371104..81f692e437 100644
--- a/gnu/services/mail.scm
+++ b/gnu/services/mail.scm
@@ -159,7 +159,7 @@
 (define (serialize-free-form-args field-name val)
   (serialize-field field-name
                    (string-join
-                    (map (match-lambda ((k . v) (format #t "~a=~a" k v))) val)
+                    (map (match-lambda ((k . v) (format #f "~a=~a" k v))) val)
                     " ")))
 
 (define-configuration dict-configuration