From 4443f2045b5e774066020941f7267d4b841c7d78 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 3 Apr 2012 21:05:29 -0400 Subject: [PATCH] report-emacs-bug: cope with read-only signature. --- lisp/ChangeLog | 4 ++++ lisp/mail/emacsbug.el | 4 +++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f811eb2ab81..75a3af814c5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-04-04 Richard Stallman + + * mail/emacsbug.el (report-emacs-bug): Bind inhibit-read-only. + 2012-04-03 Chong Yidong * 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 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))) -- 2.39.2