From 661d969155934599358de4163ea4733df33b206c Mon Sep 17 00:00:00 2001 From: jao Date: Mon, 20 Oct 2025 04:44:20 +0100 Subject: email: smtp everywhere --- custom/jao-custom-email.el | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) (limited to 'custom') 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") -- cgit v1.2.3