From: yoichi <yoichi>
Date: Thu, 20 Jan 2005 03:56:15 +0000 (+0000)
Subject: * wl-message.el (wl-message-buffer-prefetch): Count is a number
X-Git-Tag: wl-2_14-root~80
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1c4807c8bd9f0f1fa0677e5bf03a14e6b8ddcf77;p=elisp%2Fwanderlust.git

* wl-message.el (wl-message-buffer-prefetch): Count is a number
and do nothing when it is not positive.
(wl-message-buffer-prefetch-next): Ditto.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 41e36ac..943a776 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,9 @@
+2005-01-20  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+	* wl-message.el (wl-message-buffer-prefetch): Count is a number
+	and do nothing when it is not positive.
+	(wl-message-buffer-prefetch-next): Ditto.
+
 2005-01-19  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
 	* wl-summary.el (wl-summary-goto-folder-subr): Avoid error for
diff --git a/wl/wl-message.el b/wl/wl-message.el
index dd91c86..bdd45fe 100644
--- a/wl/wl-message.el
+++ b/wl/wl-message.el
@@ -683,7 +683,7 @@ Returns non-nil if bottom of message."
 					  &optional summary charset)
   (let* ((summary (or summary (get-buffer wl-summary-buffer-name)))
 	 (num number))
-    (when (and count
+    (when (and (> count 0)
 	       (wl-message-buffer-prefetch-p folder))
       (unless (wl-message-buffer-prefetch-p folder number)
 	(setq num
@@ -697,7 +697,7 @@ Returns non-nil if bottom of message."
 					       &optional summary charset)
   (let* ((summary (or summary (get-buffer wl-summary-buffer-name)))
 	 next)
-    (when (and count
+    (when (and (> count 0)
 	       (wl-message-buffer-prefetch-p folder))
       (setq next (wl-message-buffer-prefetch-get-next folder number summary))
       (when next