From: okada Date: Mon, 21 Jan 2002 22:27:08 +0000 (+0000) Subject: Remove excessive space X-Git-Tag: wl-2_9_6~14 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=8bed3d2b17bd26a46240dd9c585e23d948148afd;p=elisp%2Fwanderlust.git Remove excessive space --- diff --git a/wl/wl-score.el b/wl/wl-score.el index b6bb3fe..c4c4e9b 100644 --- a/wl/wl-score.el +++ b/wl/wl-score.el @@ -200,7 +200,7 @@ Remove Re, Was, Fwd etc." (defun wl-score-string-index< (a1 a2) (string-lessp (wl-score-ov-entity-get-by-index (car a1) wl-score-index) - (wl-score-ov-entity-get-by-index (car a2) wl-score-index))) + (wl-score-ov-entity-get-by-index (car a2) wl-score-index))) (defun wl-score-string-func< (a1 a2) (string-lessp (funcall wl-score-index (car a1)) @@ -341,7 +341,7 @@ Set `wl-score-cache' nil." (let ((files (wl-get-assoc-list-value score-alist folder (if (not wl-score-folder-alist-matchone) 'all-list))) - fl f) + fl f) (while (setq f (wl-pop files)) (wl-append fl