From: yoichi <yoichi>
Date: Mon, 6 Jan 2003 05:08:33 +0000 (+0000)
Subject: 2003-01-06  Mito  <mito@mxa.nes.nec.co.jp>
X-Git-Tag: merged-trunk-to-elmo-mark-14~50
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f1e1031c950131f5e046cc3a053367557def6fe1;p=elisp%2Fwanderlust.git

2003-01-06  Mito  <mito@mxa.nes.nec.co.jp>

	* wl-summary.el (wl-summary-line-list-info): Use %f to make
	list-count instead of %d.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 0a0516f..475b0f7 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2003-01-06  Mito  <mito@mxa.nes.nec.co.jp>
+
+	* wl-summary.el (wl-summary-line-list-info): Use %f to make
+	list-count instead of %d.
+
 2003-01-06  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
 	* wl-news.el.in (wl-news-buffer-oldest-version): New local variable.
diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index f096a38..ba42408 100644
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -4232,7 +4232,7 @@ If ARG, exit virtual folder."
 (defun wl-summary-line-list-info ()
   (let ((list-info (wl-summary-get-list-info wl-message-entity)))
     (if (car list-info)
-	(format (if (cdr list-info) "(%s %05d)" "(%s)")
+	(format (if (cdr list-info) "(%s %05.0f)" "(%s)")
 		(car list-info) (cdr list-info))
       "")))