report-emacs-bug: cope with read-only signature.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f811eb2ab8183bf13a9ae1804f03b15c113b0790..75a3af814c55b34a015d797cda60d9523f0e7f8d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-04-04  Richard Stallman  <rms@gnu.org>
+
+       * mail/emacsbug.el (report-emacs-bug): Bind inhibit-read-only.
+
 2012-04-03  Chong Yidong  <cyd@gnu.org>
 
        * mail/sendmail.el (mail-mode-map): Bind C-c C-i to

diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index 853321cba6f1b82410b4777d7736ea8faafb27e2..1a02ae7c5193c90563524a0eaa1b6ce926f736e9 100644 (file)
--- 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)))