* gnus.art.el (gnus-treat-predicate): Don't follow the Change of Oort Gnus
authoryamaoka <yamaoka>
Sat, 11 Jan 2003 14:08:18 +0000 (14:08 +0000)
committeryamaoka <yamaoka>
Sat, 11 Jan 2003 14:08:18 +0000 (14:08 +0000)
 at 2003-01-02; reverted.

ChangeLog
lisp/gnus-art.el

index 1684c77..be06ab3 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2003-01-11  Katsumi Yamaoka  <yamaoka@jpl.org>
 
 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.
 
        * lisp/message.el (message-tool-bar-map): Commented out MIME-Edit
        buttons.
 
index 1853644..ded6756 100644 (file)
@@ -6890,8 +6890,6 @@ For example:
   (cond
    ((null val)
     nil)
   (cond
    ((null val)
     nil)
-   (condition
-    (eq condition val))
    ((and (listp val)
         (stringp (car val)))
     (apply 'gnus-or (mapcar `(lambda (s)
    ((and (listp val)
         (stringp (car val)))
     (apply 'gnus-or (mapcar `(lambda (s)
@@ -6912,6 +6910,8 @@ For example:
        (error "%S is not a valid predicate" pred)))))
    ((eq val 'mime)
     gnus-show-mime)
        (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)
    ((eq val t)
     t)
    ((eq val 'head)