From 0b67cb22ddf8f1e4005326f3107f90c5f30ba399 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Mon, 18 Feb 2002 07:56:05 +0000 Subject: [PATCH] Synch with Oort Gnus. --- lisp/ChangeLog | 5 +++++ lisp/gnus-art.el | 4 +++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ce9bebd..aade0cf 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,10 @@ 2002-02-18 Katsumi Yamaoka + * gnus-art.el (article-display-x-face): Don't sort multiple + X-Faces. + +2002-02-18 Katsumi Yamaoka + * gnus-fun.el (gnus-convert-gray-x-face-to-xpm): Improved to speed up. Suggested by Yuuichi Teranishi . diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index b8401d4..0e96de8 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -2066,7 +2066,9 @@ unfolded." x-faces)) (push (cons 0 (mail-header-field-value)) x-faces))) (dolist (x-face (prog1 - (sort x-faces 'car-less-than-car) + (if grey + (sort x-faces 'car-less-than-car) + (nreverse x-faces)) (setq x-faces nil))) (push (cdr x-face) x-faces))) (while (gnus-article-goto-header "X-Face") -- 1.7.10.4