From 4d798bad11b7ace2cd00a63e5535d02c4fb2119b Mon Sep 17 00:00:00 2001 From: Julien Danjou Date: Thu, 3 Feb 2011 16:41:49 +0100 Subject: [PATCH] Revert "message: insert mail-header-separator read-only and intangible" This reverts commit a314569677d5b1c7197c7bd335ddc685795be1e5. --- lisp/ChangeLog | 2 -- lisp/message.el | 4 +--- 2 files changed, 1 insertion(+), 5 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7ea94256a..894bc72b6 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -9,8 +9,6 @@ * message.el (message-setup-1): Always generate References first. (message-mail): Return the return value of message-setup, not always t. - (message-setup-1): Insert mail-header-separator with read-only and - intangible properties set. * gnus.el (gnus-summary-line-format): Add missing semi-colon for user-date in docstring. diff --git a/lisp/message.el b/lisp/message.el index 595a803fa..42ca73c2f 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -6444,9 +6444,7 @@ are not included." (funcall message-default-headers) message-default-headers)) (or (bolp) (insert ?\n))) - (let ((message-forbidden-properties nil)) - (insert (propertize (concat mail-header-separator "\n") - 'read-only t 'rear-nonsticky t 'intangible t))) + (insert mail-header-separator "\n") (forward-line -1) ;; If a crash happens while replying, the auto-save file would *not* have a ;; `References:' header if `message-generate-headers-first' was nil. -- 2.25.1