* wl-score.el (wl-score-get-score-alist): Abolish `temp' key in

score file.  Use `target' instead.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 173d5e6..c49c0cb 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2001-03-08  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+       * wl-score.el (wl-score-get-score-alist): Abolish `temp' key in
+       score file.  Use `target' instead.
+
 2001-03-07  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
        * wl-folder.el (wl-folder-guess-mailing-list-by-folder-name):

diff --git a/wl/wl-score.el b/wl/wl-score.el
index a0d93b8..fe8bb3a 100644 (file)
--- a/wl/wl-score.el
+++ b/wl/wl-score.el
@@ -374,13 +374,12 @@ Set `wl-score-cache' nil."
       (let ((mark (car (wl-score-get 'mark alist)))
            (expunge (car (wl-score-get 'expunge alist)))
            (mark-and-expunge (car (wl-score-get 'mark-and-expunge alist)))
-           (temp (car (wl-score-get 'temp alist))) ; obsolate
            (target (car (wl-score-get 'target alist)))
            (important (car (wl-score-get 'important alist))))
        (setq wl-summary-important-above
              (or important wl-summary-important-above))
        (setq wl-summary-target-above
-             (or target temp wl-summary-target-above))
+             (or target wl-summary-target-above))
        (setq wl-summary-mark-below
              (or mark mark-and-expunge wl-summary-mark-below))
        (setq wl-summary-expunge-below