Konrad Makowski <poc...@konradmakowski.pl> writes:

> I use msmtp for my needs.
>
> (define (send-email)
>  (let ((port (open-pipe* OPEN_BOTH "msmtp" SMTP_MAIL_TO_SECRETARY)))
>  (display (smtp-body) port)
>  (close-pipe port)))

You should use OPEN_WRITE instead of OPEN_BOTH here, but otherwise it
looks good to me.

     Mark

Reply via email to