diff options
| -rw-r--r-- | custom/jao-custom-email.el | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/custom/jao-custom-email.el b/custom/jao-custom-email.el index 262b312..2e886ff 100644 --- a/custom/jao-custom-email.el +++ b/custom/jao-custom-email.el @@ -209,13 +209,18 @@ (setq smtpmail-smtp-service 587)) (defun jao-sendmail-local () - (setq send-mail-function 'sendmail-send-it) + (setq send-mail-function 'smtpmail-send-it) ;; send-mail-function + ;; (setq sendmail-program "/usr/sbin/sendmail") (setq smtpmail-auth-supported nil) ;; (cram-md5 plain login) (setq smtpmail-servers-requiring-authorization nil) (setq smtpmail-smtp-user nil) (setq smtpmail-smtp-server "127.0.0.1") (setq smtpmail-smtp-service 25)) +(defun jao-sendmail-send-it () + (with-temp-message "Sending email..." + (sendmail-send-it))) + (defun jao-sendmail-msmtp () (setq send-mail-function 'sendmail-send-it sendmail-program (executable-find "msmtp") @@ -223,9 +228,7 @@ message-sendmail-envelope-from 'header mail-envelope-from 'header)) -(jao-d-l - (jao-sendmail-msmtp) - (jao-sendmail-local)) +(jao-sendmail-local) ;;; bbdb ;; (jao-load-path "bbdb/lisp") |