From: hmurata <hmurata>
Date: Thu, 10 Mar 2005 11:33:52 +0000 (+0000)
Subject: (wl-summary-rescan-message): Call
X-Git-Tag: wl-2_14-root~6
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0e05976ad6f58ab63d2729805df9b1c89168e8ef;p=elisp%2Fwanderlust.git

(wl-summary-rescan-message): Call
`wl-highlight-summary-displaying' when displaying a message.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 39eb120..d2e4ac7 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2005-03-10  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+	* wl-summary.el (wl-summary-rescan-message): Call
+	`wl-highlight-summary-displaying' when displaying a message.
+
 2005-03-07  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
 	* wl-draft.el (wl-draft-config-info-filename): Extracted from
diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index f719f8a..2925406 100644
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -1191,6 +1191,11 @@ Entering Folder mode calls the value of `wl-summary-mode-hook'."
 				     (wl-summary-temp-mark number)
 				     (elmo-message-flags folder number)
 				     (elmo-message-cached-p folder number)))))
+      (when (and wl-summary-buffer-disp-msg
+		 wl-summary-buffer-current-msg)
+	(save-excursion
+	  (when (wl-summary-jump-to-msg wl-summary-buffer-current-msg)
+	    (wl-highlight-summary-displaying))))
       (wl-summary-set-message-modified)
       (wl-summary-jump-to-msg start-number)
       (move-to-column start-column))))