Argument passing.

This commit is contained in:
Dominik Pantůček 2023-04-11 09:15:14 +02:00
parent cb798ca799
commit 6fb6528919

View file

@ -50,8 +50,10 @@
(list to)))) (list to))))
(apply process-send/recv (apply process-send/recv
"mail" "mail"
(list "-r" from (append (if from
"-s" subject (list "-r" from)
'())
(list "-s" subject)
tos) tos)
body-lines)))) body-lines))))