From: yamaoka <yamaoka>
Date: Sun, 13 Apr 2003 13:39:44 +0000 (+0000)
Subject: Synch to Oort Gnus 200304131330.
X-Git-Tag: t-gnus-6_15_20-00-quimby~32
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0a5bda00c2f121a11b5584079ee2f0a1faa4c836;p=elisp%2Fgnus.git-

Synch to Oort Gnus 200304131330.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 00b39bb..f7a578e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -7,6 +7,8 @@
 
 2003-04-13  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+	* message.el (message-hide-headers): Don't do intangible.
+
 	* gnus.el (gnus-group-prefixed-name): Comment out the test for
 	colon. 
 
diff --git a/lisp/message.el b/lisp/message.el
index 566585d..c1cbb74 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -7307,9 +7307,9 @@ regexp varstr."
 		(message-next-header)
 	      (let ((begin (point)))
 		(message-next-header)
-		(add-text-properties begin (point)
-				     '(intangible t invisible t
-						  message-hidden t))))))))))
+		(add-text-properties
+		 begin (point)
+		 '(invisible t message-hidden t))))))))))
 
 (defun message-hide-header-p (regexps)
   (let ((result nil)