From: murata <murata>
Date: Sat, 3 Mar 2001 12:48:44 +0000 (+0000)
Subject: wl-summary.el (wl-summary-goto-folder-subr): Fixed problem that last
X-Git-Tag: wl-2_6-root~61
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=636e756885b036889aa34db7b47ad0466403b0c7;p=elisp%2Fwanderlust.git

wl-summary.el (wl-summary-goto-folder-subr): Fixed problem that last
unread message is skipped.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index bc482bd..c5c3fd0 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2001-03-03  Masahiro MURATA  <muse@ba2.so-net.ne.jp>
+
+	* wl-summary.el (wl-summary-goto-folder-subr): Fixed problem that
+	last unread message is skipped.
+
 2001-03-01  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* wl-summary.el (wl-summary-next-message):
diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index ddea1ae..37d896d 100644
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -2805,7 +2805,7 @@ If ARG, without confirm."
 	  (if (wl-summary-cursor-down t)
 	      (let ((unreadp (wl-summary-next-message 
 			      (wl-summary-message-number)
-			      'down nil)))
+			      'down t)))
 		(cond ((and wl-auto-select-first unreadp)
 		       (setq retval 'disp-msg))
 		      ((not unreadp)