From d2880b63370fecda94e8389e0021641ae49bedaf Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Dominik=20Pant=C5=AF=C4=8Dek?=
 <dominik.pantucek@trustica.cz>
Date: Fri, 19 May 2023 19:48:17 +0200
Subject: [PATCH] Use email string.

---
 src/mailman.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mailman.scm b/src/mailman.scm
index 8ed8184..50476a8 100644
--- a/src/mailman.scm
+++ b/src/mailman.scm
@@ -152,7 +152,7 @@
 	  (mailman-send/recv
 	   "add_members"
 	   (list "-r" "-" listname)
-	   (sprintf "<<<\"~A\"" email))))
+	   email)))
      (let loop ((lines result))
        (when (not (null? lines))
 	 (print " | " (car lines))