mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-17 17:58:46 +00:00
Code Issues Releases Activity

(report-emacs-bug): Don't assume the exit command

Browse Source 
is mail-send-and-exit for all user agents.
This commit is contained in:
Richard M. Stallman 1997-07-03 02:29:48 +00:00
parent b527f6c26c
commit ceaa7fbed1
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/mail/emacsbug.el
View File

@ -109,8 +109,9 @@ Prompts for bug subject. Leaves you in a mail buffer."
(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)