aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/mail
diff options
context:
space:
mode:
authorLars Magne Ingebrigtsen2012-03-04 14:34:33 +0100
committerLars Magne Ingebrigtsen2012-03-04 14:34:33 +0100
commite627be4c9ddaec9e4037166ebbac2d09b5bce28a (patch)
tree70e546c1bd26fce5351ac74a6ae878269afd981c /lisp/mail
parentebeabff47e793ca13a0c54b1442d87060f709227 (diff)
downloademacs-e627be4c9ddaec9e4037166ebbac2d09b5bce28a.tar.gz
emacs-e627be4c9ddaec9e4037166ebbac2d09b5bce28a.zip
Fix up the emacsbug query-once logic from the previous patch
* mail/emacsbug.el (report-emacs-bug-hook): Fix up thinko in previous patch: Check `message-send-mail-function', and not the default function. Fixes: debbugs:10897
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/emacsbug.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index aa98da87904..853321cba6f 100644
--- a/lisp/mail/emacsbug.el
+++ b/lisp/mail/emacsbug.el
@@ -395,8 +395,7 @@ and send the mail again%s."
395 ;; questions about From header validity if the user is going to 395 ;; questions about From header validity if the user is going to
396 ;; use mailclient, anyway. 396 ;; use mailclient, anyway.
397 (when (or (and (derived-mode-p 'message-mode) 397 (when (or (and (derived-mode-p 'message-mode)
398 (eq (message-default-send-mail-function) 398 (eq message-send-mail-function 'sendmail-query-once))
399 'sendmail-query-once))
400 (and (not (derived-mode-p 'message-mode)) 399 (and (not (derived-mode-p 'message-mode))
401 (eq send-mail-function 'sendmail-query-once))) 400 (eq send-mail-function 'sendmail-query-once)))
402 (sendmail-query-user-about-smtp) 401 (sendmail-query-user-about-smtp)