summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2010-12-07 19:47:27 -0800
committerGlenn Morris <rgm@gnu.org>2010-12-07 19:47:27 -0800
commit5fe9ebd14e9f41704c0bedb9ea0c6ad4e4501995 (patch)
tree3cefd59cd704f2f776ef29beaef58df0192956eb
parentec1b9b17fa69a4ac051f64e21c85660d127c23a5 (diff)
downloademacs-5fe9ebd14e9f41704c0bedb9ea0c6ad4e4501995.tar.gz
* mail/emacsbug.el (report-emacs-bug): Try to handle some other mail clients.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/mail/emacsbug.el8
2 files changed, 12 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c6e035ebe97..ef07e777022 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-12-08 Glenn Morris <rgm@gnu.org>
+
+ * mail/emacsbug.el (report-emacs-bug):
+ Try to handle some other mail clients.
+
2010-12-08 Stefan Monnier <monnier@iro.umontreal.ca>
* files.el (dir-locals-collect-variables): Don't let errors stop us.
diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index 5bc6a7edd82..40a5c081cfd 100644
--- a/lisp/mail/emacsbug.el
+++ b/lisp/mail/emacsbug.el
@@ -288,7 +288,13 @@ usually do not have translators to read other languages for them.\n\n")
report-emacs-bug-send-hook 'mail-send-hook))
((eq mail-user-agent 'mh-e-user-agent)
(setq report-emacs-bug-send-command "mh-send-letter"
- report-emacs-bug-send-hook 'mh-before-send-letter-hook)))
+ report-emacs-bug-send-hook 'mh-before-send-letter-hook))
+ ((eq mail-user-agent 'vm-user-agent)
+ (setq report-emacs-bug-send-command "vm-mail-send-and-exit"
+ report-emacs-bug-send-hook 'vm-mail-send-hook))
+ ((eq mail-user-agent 'wl-user-agent)
+ (setq report-emacs-bug-send-command "wl-draft-send-and-exit"
+ report-emacs-bug-send-hook 'wl-draft-send-hook)))
(unless report-emacs-bug-no-explanations
(with-output-to-temp-buffer "*Bug Help*"
(princ "While in the mail buffer:\n\n")