From: hmurata <hmurata>
Date: Sun, 7 Nov 2004 11:41:48 +0000 (+0000)
Subject: (wl-summary-switch-to-clone-buffer): Remove event
X-Git-Tag: wl-2_12-root~44
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=afa569c8a969fa67346f97c17962d085b09d8421;p=elisp%2Fwanderlust.git

(wl-summary-switch-to-clone-buffer): Remove event
handler of current buffer from elmo-folder.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 3d216b9..bbe75d4 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2004-11-07  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+	* wl-summary.el (wl-summary-switch-to-clone-buffer): Remove event
+	handler of current buffer from elmo-folder.
+
 2004-11-07  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
 	* wl-fldmgr.el (wl-fldmgr-sort): Confirm before sorting.
diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index afedf62..3a5609c 100644
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -2231,6 +2231,9 @@ If ARG, without confirm."
 	     (symbol-value (car copy-variables))))
       (setq copy-variables (cdr copy-variables)))
     (switch-to-buffer buf)
+    (with-current-buffer cur-buf
+      (elmo-folder-remove-handler wl-summary-buffer-elmo-folder
+				  wl-summary-buffer-event-handler))
     (kill-buffer cur-buf)
     (wl-summary-count-unread)
     (wl-summary-update-modeline)