From: teranisi <teranisi>
Date: Sat, 2 Aug 2003 16:42:12 +0000 (+0000)
Subject: * wl-summary.el (wl-summary-input-range): Abolish all-noscore and
X-Git-Tag: wl-2_11_6~13
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=5ded6e92cf8ef3aa01d443dfb6aad1e924638539;p=elisp%2Fwanderlust.git

* wl-summary.el (wl-summary-input-range): Abolish all-noscore and
  update-noscore.
(wl-summary-sync): Follow the change above.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 7804273..9f5bfa4 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,7 +1,9 @@
 2003-08-02  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* wl-summary.el (wl-summary-sync): Rearrange rescan.
-	(wl-summary-input-range): Added rescan-nokill.
+	(wl-summary-input-range): Added rescan-nokill, abolish all-noscore
+	and update-noscore.
+	(wl-summary-sync): Follow the change above.
 
 2003-08-02  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
diff --git a/wl/wl-score.el b/wl/wl-score.el
index 8fc34a5..03929f8 100644
--- a/wl/wl-score.el
+++ b/wl/wl-score.el
@@ -1242,7 +1242,7 @@ Set `wl-score-cache' nil."
       (when (and update update-unread)
 	;; Update Folder mode
 	(wl-folder-set-folder-updated (wl-summary-buffer-folder-name)
-				      (list 
+				      (list
 				       0
 				       (let ((pair
 					      (wl-summary-count-unread)))
diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index a281f9b..8d7191c 100644
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -1182,13 +1182,9 @@ Entering Folder mode calls the value of `wl-summary-mode-hook'."
 						 folder))
 					'force-update nil nil t))
 	  (t
-	   (let ((wl-use-scoring (if (string-match "noscore" range)
-				     nil
-				   wl-use-scoring)))
-	     (wl-summary-sync-update unset-cursor
-				     (or (string-match "nokill" range)
-					 (string-match "noscore" range))
-				     (string-match "all" range)))))))
+	   (wl-summary-sync-update unset-cursor
+				   (string-match "nokill" range)
+				   (string-match "all" range))))))
 
 (defvar wl-summary-edit-addresses-candidate-fields
   ;; First element becomes default.
@@ -3318,14 +3314,12 @@ Return non-nil if the mark is updated"
 			    "last:"
 			    "cache-status"
 			    "rescan"
-n			    "rescan-nokill"
+			    "rescan-nokill"
 			    "rescan-noscore"
 			    "update"
 			    "update-nokill"
-			    "update-noscore"
 			    "all"
-			    "all-nokill"
-			    "all-noscore"))
+			    "all-nokill"))
 	(default (or (wl-get-assoc-list-value
 		      wl-folder-sync-range-alist
 		      folder)