Mercurial > emacs
changeset 44056:448873845bcc
(report-emacs-bug-hook): Remove submitter
directions as the last action.
| author | Thien-Thi Nguyen <ttn@gnuvola.org> |
|---|---|
| date | Thu, 21 Mar 2002 02:09:51 +0000 |
| parents | e3ec843fefb0 |
| children | 6f847a384e1a |
| files | lisp/mail/emacsbug.el |
| diffstat | 1 files changed, 10 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/emacsbug.el Wed Mar 20 23:16:48 2002 +0000 +++ b/lisp/mail/emacsbug.el Thu Mar 21 02:09:51 2002 +0000 @@ -128,7 +128,7 @@ default-enable-multibyte-characters)) (insert "\n") (insert "Please describe exactly what actions triggered the bug\n" - "and the precise symptoms of the bug:\n\n") + "and the precise symptoms of the bug:\n\n") (setq user-point (point)) (insert "\n\n\n" "Recent input:\n") @@ -236,7 +236,15 @@ please insert the proper e-mail address after \"To: \", and send the mail again using \\[mail-send-and-exit]."))) (error "M-x report-emacs-bug was cancelled, please read *Bug Help* buffer")) - )) + + ;; Unclutter + (mail-text) + (let ((p (point))) + (re-search-forward (concat "^In " (emacs-version))) + (delete-region p (match-beginning 0))) + (re-search-forward "Please describe.+\n.+precise symptoms.+bug:\n*" + (point-max) t) + (replace-match "Symptoms:\n"))) (provide 'emacsbug)