diff options
| author | Richard M. Stallman <rms@gnu.org> | 2012-04-03 21:05:29 -0400 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2012-04-03 21:05:29 -0400 |
| commit | 4443f2045b5e774066020941f7267d4b841c7d78 (patch) | |
| tree | bc959499d583b8d16de034fd21e6f82356833ac1 /lisp/mail | |
| parent | 82ac93bdaad54e9e66cce757b77417e4863d5002 (diff) | |
| download | emacs-4443f2045b5e774066020941f7267d4b841c7d78.tar.gz | |
report-emacs-bug: cope with read-only signature.
Diffstat (limited to 'lisp/mail')
| -rw-r--r-- | lisp/mail/emacsbug.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el index 853321cba6f..1a02ae7c519 100644 --- a/lisp/mail/emacsbug.el +++ b/lisp/mail/emacsbug.el @@ -182,7 +182,9 @@ Prompts for bug subject. Leaves you in a mail buffer." (set (make-local-variable 'message-strip-special-text-properties) nil)) (rfc822-goto-eoh) (forward-line 1) - (let ((signature (buffer-substring (point) (point-max)))) + ;; Move the mail signature to the proper place. + (let ((signature (buffer-substring (point) (point-max))) + (inhibit-read-only t)) (delete-region (point) (point-max)) (insert signature) (backward-char (length signature))) |