From: teranisi <teranisi>
Date: Mon, 16 Sep 2002 23:57:12 +0000 (+0000)
Subject: * wl-folder.el (wl-folder-check-one-entity): Follow the API change on
X-Git-Tag: elmo-mark-restart~144
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1795ff5df694e5b8a29776c1093c6640176d6848;p=elisp%2Fwanderlust.git

* wl-folder.el (wl-folder-check-one-entity): Follow the API change on
 `wl-summary-count-unread'.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 05fa25f..8a52dab 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,5 +1,8 @@
 2002-09-16  Yuuichi Teranishi  <teranisi@gohome.org>
 
+	* wl-folder.el (wl-folder-check-one-entity): Follow the API change on
+	`wl-summary-count-unread'.
+
 	* wl-summary.el (wl-summary-sync-marks): Treat global-mark here.
 
 	* wl-version.el (wl-version): Set codename for `elmo-mark' branch.
diff --git a/wl/wl-folder.el b/wl/wl-folder.el
index 30b17d6..a6ed1b2 100644
--- a/wl/wl-folder.el
+++ b/wl/wl-folder.el
@@ -851,7 +851,7 @@ Optional argument ARG is repeart count."
 	      all    (and all    (max 0 all))))
       (setq unread (or (and unread (- unread (or new 0)))
 		       (elmo-folder-get-info-unread folder)
-		       (cdr (wl-summary-count-unread))))
+		       (nth 1 (wl-summary-count-unread))))
       (wl-folder-entity-hashtb-set wl-folder-entity-hashtb entity
 				   (list new unread all)
 				   (get-buffer wl-folder-buffer-name)))