From: teranisi <teranisi>
Date: Tue, 23 Nov 2004 13:02:21 +0000 (+0000)
Subject: (wl-current-message-buffer): Fixed bug when yank from
X-Git-Tag: wl-2_12-root~33
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=abb149108c2256ffaecd5a22f1ba9597c52971ef;p=elisp%2Fwanderlust.git

(wl-current-message-buffer): Fixed bug when yank from
a summary which has toggle display status off.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index cc3179d..44e4a09 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2004-11-23  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* wl-util.el (wl-current-message-buffer): Fixed bug when yank from
+	a summary which has toggle display status off.
+
 2004-11-23  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
 	* wl-draft.el (wl-draft-do-fcc): No cache save.
diff --git a/wl/wl-util.el b/wl/wl-util.el
index 8ab6493..9b4eb20 100644
--- a/wl/wl-util.el
+++ b/wl/wl-util.el
@@ -536,9 +536,11 @@ that `read' can handle, whenever this is possible."
     (with-current-buffer wl-current-summary-buffer
       (or wl-message-buffer
 	  (and (wl-summary-message-number)
-	       (car (wl-message-buffer-display wl-summary-buffer-elmo-folder
-					       (wl-summary-message-number)
-					       nil nil)))))))
+	       (car (wl-message-buffer-display
+		     wl-summary-buffer-elmo-folder
+		     (wl-summary-message-number)
+		     wl-summary-buffer-display-mime-mode
+		     nil nil)))))))
 
 (defmacro wl-kill-buffers (regexp)
   (` (mapcar (function