Safe passing of subprocess arguments - always.

This commit is contained in:
Dominik Pantůček 2023-04-13 20:45:35 +02:00
parent ee8aa95e24
commit 7f7d1c43c8
3 changed files with 13 additions and 13 deletions

View file

@ -73,12 +73,11 @@
;; Mailman-specific process output lines capture
(define (get-mailman-output-lines bin . args)
(get-process-output-lines
(string-intersperse
(cons (mailman-bin bin)
args)
" ")))
(apply
get-process-output-lines
(mailman-bin bin)
args))
;; Returns the list of available lists
(define (list-mailman-lists)
(get-mailman-output-lines "list_lists" "-b"))