From 75c1b21f79055f0a8c1e4a5ce269d14c3106d51f Mon Sep 17 00:00:00 2001 From: yoichi Date: Mon, 27 Jan 2003 15:07:34 +0000 Subject: [PATCH] update --- wl/wl-highlight.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/wl/wl-highlight.el b/wl/wl-highlight.el index 50b2bd2..0eda7dd 100644 --- a/wl/wl-highlight.el +++ b/wl/wl-highlight.el @@ -767,12 +767,12 @@ (defun wl-highlight-summary-line-string (line mark temp-mark indent) (let (fsymbol) - (cond ((and (string= temp-mark "+") + (cond ((and (string= temp-mark wl-summary-score-over-mark) (member mark (list wl-summary-unread-cached-mark wl-summary-unread-uncached-mark wl-summary-new-mark))) (setq fsymbol 'wl-highlight-summary-high-unread-face)) - ((and (string= temp-mark "-") + ((and (string= temp-mark wl-summary-score-below-mark) (member mark (list wl-summary-unread-cached-mark wl-summary-unread-uncached-mark wl-summary-new-mark))) @@ -832,12 +832,12 @@ dest t)))) (if (not fsymbol) (cond - ((and (string= temp-mark "+") + ((and (string= temp-mark wl-summary-score-over-mark) (member status-mark (list wl-summary-unread-cached-mark wl-summary-unread-uncached-mark wl-summary-new-mark))) (setq fsymbol 'wl-highlight-summary-high-unread-face)) - ((and (string= temp-mark "-") + ((and (string= temp-mark wl-summary-score-below-mark) (member status-mark (list wl-summary-unread-cached-mark wl-summary-unread-uncached-mark wl-summary-new-mark))) @@ -850,9 +850,9 @@ ((string= status-mark wl-summary-important-mark) (setq fsymbol 'wl-highlight-summary-important-face)) ;; score mark - ((string= temp-mark "-") + ((string= temp-mark wl-summary-score-below-mark) (setq fsymbol 'wl-highlight-summary-low-read-face)) - ((string= temp-mark "+") + ((string= temp-mark wl-summary-score-over-mark) (setq fsymbol 'wl-highlight-summary-high-read-face)) ;; (t (if (null -- 1.7.10.4