* 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 (file)
--- 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 (file)
--- 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)