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)))

Works great.

Konrad


Reply via email to