From: hmurata <hmurata>
Date: Thu, 20 Jun 2002 00:23:58 +0000 (+0000)
Subject: * wl-summary.el (wl-summary-prefetch-msg): Bind
X-Git-Tag: elmo-mark-root~75
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8e0f9945e3d63a889385749114b5d502b544b5da;p=elisp%2Fwanderlust.git

* wl-summary.el (wl-summary-prefetch-msg): Bind
`wl-message-entity' to call `wl-summary-from-function'.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 67eff30..86299a1 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2002-06-20  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+	* wl-summary.el (wl-summary-prefetch-msg): Bind
+	`wl-message-entity' to call `wl-summary-from-function'.
+
 2002-06-19  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
 	* wl-message.el (wl-message-buffer-create): Run
@@ -11,7 +16,7 @@
 	(wl-summary-sort-by-list-info): New function.
 
 2002-06-18  KAMO Tomoyuki  <kamo@i-manage.co.jp>
-	
+
 	* wl-summary.el (wl-summary-get-list-info): New function.
 	(wl-summary-sort): Rewrite.
 	(wl-summary-line-list-info): Ditto.
diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index 6ec74cc..aae717f 100644
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -1373,7 +1373,8 @@ If ARG is non-nil, checking is omitted."
 	   (number-alist (elmo-msgdb-get-number-alist msgdb))
 	   (message-id (cdr (assq number number-alist)))
 	   (ov (elmo-msgdb-overview-get-entity message-id msgdb))
-	   (entity ov)
+	   (wl-message-entity ov)
+	   (entity ov)			; backward compatibility.
 	   (size (elmo-msgdb-overview-entity-get-size ov))
 	   (inhibit-read-only t)
 	   (buffer-read-only nil)