Mercurial > emacs
changeset 18568:5f22717861fa
(report-emacs-bug): Don't assume the exit command
is mail-send-and-exit for all user agents.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 03 Jul 1997 02:29:48 +0000 |
| parents | 1ece30a0422b |
| children | b751e29103f4 |
| files | lisp/mail/emacsbug.el |
| diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/emacsbug.el Thu Jul 03 01:06:11 1997 +0000 +++ b/lisp/mail/emacsbug.el Thu Jul 03 02:29:48 1997 +0000 @@ -109,8 +109,9 @@ (use-local-map (nconc (make-sparse-keymap) (current-local-map))) (define-key (current-local-map) "\C-c\C-i" 'report-emacs-bug-info) (with-output-to-temp-buffer "*Bug Help*" - (princ (substitute-command-keys - "Type \\[mail-send-and-exit] to send the bug report.\n")) + (if (eq mail-user-agant 'sendmail-user-agent) + (princ (substitute-command-keys + "Type \\[mail-send-and-exit] to send the bug report.\n"))) (princ (substitute-command-keys "Type \\[kill-buffer] RET to cancel (don't send it).\n")) (terpri)