From c17f2ec5c71b32c6bd50803ae8daabf5ede68a3d Mon Sep 17 00:00:00 2001 From: yamaoka Date: Sat, 11 Jan 2003 14:08:18 +0000 Subject: [PATCH] * gnus.art.el (gnus-treat-predicate): Don't follow the Change of Oort Gnus at 2003-01-02; reverted. --- ChangeLog | 3 +++ lisp/gnus-art.el | 4 ++-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 1684c77..be06ab3 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,8 @@ 2003-01-11 Katsumi Yamaoka + * 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 1853644..ded6756 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -6890,8 +6890,6 @@ For example: (cond ((null val) nil) - (condition - (eq condition val)) ((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) + (condition + (eq condition val)) ((eq val t) t) ((eq val 'head) -- 1.7.10.4