From: yamaoka <yamaoka>
Date: Sat, 11 Jan 2003 14:08:09 +0000 (+0000)
Subject: * gnus.art.el (gnus-treat-predicate): Don't follow the Change of Oort Gnus
X-Git-Tag: t-gnus-6_15_11-00~2
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=01fe7177d2d91cea03013480f19ffab053f81ff5;p=elisp%2Fgnus.git-

* gnus.art.el (gnus-treat-predicate): Don't follow the Change of Oort Gnus
 at 2003-01-02; reverted.
---

diff --git a/ChangeLog b/ChangeLog
index 26a68ad..aaf501a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2003-01-11  Katsumi Yamaoka  <yamaoka@jpl.org>
 
+	* lisp/gnus.art.el (gnus-treat-predicate): Don't follow the Change
+	of Oort Gnus at 2003-01-02; reverted.
+
 	* lisp/message.el (message-tool-bar-map): Commented out MIME-Edit
 	buttons.
 
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 048f48f..c56be74 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -6846,8 +6846,6 @@ For example:
   (cond
    ((null val)
     nil)
-   (condition
-    (eq condition val))
    ((and (listp val)
 	 (stringp (car val)))
     (apply 'gnus-or (mapcar `(lambda (s)
@@ -6868,6 +6866,8 @@ For example:
 	(error "%S is not a valid predicate" pred)))))
    ((eq val 'mime)
     gnus-show-mime)
+   (condition
+    (eq condition val))
    ((eq val t)
     t)
    ((eq val 'head)