Mercurial > emacs
changeset 45027:aae55a41ad03
(report-emacs-bug-hook): Use replace-match only if search was successful.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 30 Apr 2002 17:11:30 +0000 |
| parents | 83eb711e6735 |
| children | 21b59c29309b |
| files | lisp/mail/emacsbug.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/emacsbug.el Tue Apr 30 16:36:02 2002 +0000 +++ b/lisp/mail/emacsbug.el Tue Apr 30 17:11:30 2002 +0000 @@ -242,9 +242,9 @@ (let ((p (point))) (if (re-search-forward (concat "^In " (emacs-version)) nil t) (delete-region p (match-beginning 0)))) - (re-search-forward "Please describe.+\n.+precise symptoms.+bug:\n*" - (point-max) t) - (replace-match "Symptoms:\n"))) + (if (re-search-forward "Please describe.+\n.+precise symptoms.+bug:\n*" + (point-max) t) + (replace-match "Symptoms:\n")))) (provide 'emacsbug)