From 3ea8f5d0f5b382335a2c12016e23c165e3c872da Mon Sep 17 00:00:00 2001 From: yamaoka Date: Thu, 10 Jan 2002 05:59:56 +0000 Subject: [PATCH] * message.el (message-strip-forbidden-properties): Don't strip properties when the invisible MIME part is inserted. --- ChangeLog | 3 +++ lisp/message.el | 4 +++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 61045f1..2144f9f 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,8 @@ 2002-01-10 Katsumi Yamaoka + * lisp/message.el (message-strip-forbidden-properties): Don't + strip properties when the invisible MIME part is inserted. + * lisp/gnus-xmas.el (gnus-xmas-group-startup-message): Position point to the top. diff --git a/lisp/message.el b/lisp/message.el index 3012501..2118617 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -1934,7 +1934,9 @@ These properties are essential to work, so we should never strip them." This function is intended to be called from `after-change-functions'. See also `message-forbidden-properties'." (when (and message-strip-special-text-properties - (message-tamago-not-in-use-p begin)) + (message-tamago-not-in-use-p begin) + ;; Check whether the invisible MIME part is not inserted. + (not (text-property-any begin end 'mime-edit-invisible t))) (remove-text-properties begin end message-forbidden-properties))) ;;;###autoload -- 1.7.10.4