brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix ML removal.

Browse source
This commit is contained in:
Dominik Pantůček 2023-06-28 21:43:55 +02:00
parent 14eedb026b
commit a71a71e044
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/mailman.scm
View file

@ -163,7 +163,7 @@
(print "Remove " email " from " listname ".") (print "Remove " email " from " listname ".")
(let ((result (let ((result
(get-mailman-output-lines (get-mailman-output-lines
"remove_members" (car listname) "remove_members" listname
(sprintf "\"~A\"" email)))) (sprintf "\"~A\"" email))))
(let loop ((lines result)) (let loop ((lines result))
(when (not (null? lines)) (when (not (null? lines))