Fix passing members to remove_members mailman binary.
This commit is contained in:
parent
43b8fbb1ab
commit
d471981545
1 changed files with 1 additions and 1 deletions
|
@ -164,7 +164,7 @@
|
||||||
(let ((result
|
(let ((result
|
||||||
(get-mailman-output-lines
|
(get-mailman-output-lines
|
||||||
"remove_members" 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))
|
||||||
(print " | " (car lines))
|
(print " | " (car lines))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue