From 04477ba743cf2bcdaa1f8593af54b57cc90b8f5c Mon Sep 17 00:00:00 2001 From: okazaki Date: Sun, 18 Feb 2001 21:26:35 +0000 Subject: [PATCH] * wl-highlight.el (wl-highlight-summary-line-string): Use `zerop' instead of `= 0'. (wl-highlight-summary): Use `zerop' instead of `eq 0'. --- wl/wl-highlight.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/wl/wl-highlight.el b/wl/wl-highlight.el index c818ff7..4be1ac9 100644 --- a/wl/wl-highlight.el +++ b/wl/wl-highlight.el @@ -820,7 +820,7 @@ (setq fsymbol 'wl-highlight-summary-low-read-face)) ((string= temp-mark "+") (setq fsymbol 'wl-highlight-summary-high-read-face)) - (t (if (= 0 (length indent)) + (t (if (zerop (length indent)) (setq fsymbol 'wl-highlight-summary-thread-top-face) (setq fsymbol 'wl-highlight-summary-normal-face)))) (put-text-property 0 (length line) 'face fsymbol line)) @@ -1012,7 +1012,7 @@ interpreted as cited text.)" (when (> lines elmo-display-progress-threshold) (setq i (+ i 1)) (setq percent (/ (* i 100) lines)) - (if (or (eq (% percent 5) 0) (= i lines)) + (if (or (zerop (% percent 5)) (= i lines)) (elmo-display-progress 'wl-highlight-summary "Highlighting..." percent))) -- 1.7.10.4