Fix typo.

This commit is contained in:
Dominik Pantůček 2023-04-08 17:49:38 +02:00
parent 902ca13189
commit 9d353bfb09

View file

@ -181,7 +181,7 @@
(mailman-compare-members ml emails)) (mailman-compare-members ml emails))
(define listname (mailman-list-name ml)) (define listname (mailman-list-name ml))
(let loop ((emails missing)) (let loop ((emails missing))
(add-emails-to-mailman-list listname (car emails)) (add-email-to-mailman-list listname (car emails))
(loop (cdr emails))) (loop (cdr emails)))
(let loop ((emails surplus)) (let loop ((emails surplus))
(remove-email-from-mailman-list listname (car emails)) (remove-email-from-mailman-list listname (car emails))