From 41080d06c70ad15bd2d44e746896cb92398551c5 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dominik=20Pant=C5=AF=C4=8Dek?= Date: Sat, 8 Apr 2023 17:52:34 +0200 Subject: [PATCH] Return as lists. --- src/mailman.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/mailman.scm b/src/mailman.scm index 1f3a9d2..af6af35 100644 --- a/src/mailman.scm +++ b/src/mailman.scm @@ -173,7 +173,8 @@ (emails (list->lset emails)) (surplus (lset-subtract mlemails emails)) (missing (lset-subtract emails mlemails))) - (values missing surplus))) + (values (lset->list missing) + (lset->list surplus)))) ;; Ensures given ML subscribers are exactly what is in emails list (define (mailman-sync-members ml emails)