From: teranisi <teranisi>
Date: Thu, 7 Nov 2002 08:52:14 +0000 (+0000)
Subject: * wl-draft.el (wl-user-agent-compose): Delete special case for
X-Git-Tag: wl-2_11_1~66
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8832cd3e9f7ec70881f01b521ca8447626331854;p=elisp%2Fwanderlust.git

* wl-draft.el (wl-user-agent-compose): Delete special case for
switch-to-buffer-other-window.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 29f003a..1760c9c 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,5 +1,8 @@
 2002-11-07  Yuuichi Teranishi  <teranisi@gohome.org>
 
+	* wl-draft.el (wl-user-agent-compose): Delete special case for
+	switch-to-buffer-other-window.
+
 	* wl-summary.el (wl-summary-reply): Don't treat switch buffer here.
 	(wl-summary-forward): Ditto.
 
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 2b4374a..d2df298 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -2394,11 +2394,6 @@ been implemented yet.  Partial support for SWITCH-FUNCTION now supported."
   (let ((wl-user-agent-headers-and-body-alist other-headers)
 	(wl-draft-use-frame (eq switch-function 'switch-to-buffer-other-frame))
 	(wl-draft-buffer-style switch-function))
-    (when (eq switch-function 'switch-to-buffer-other-window)
-      (when (one-window-p t)
-	(if (window-minibuffer-p) (other-window 1))
-	(split-window))
-      (other-window 1))
     (if to
 	(if (wl-string-match-assoc "to" wl-user-agent-headers-and-body-alist
 				   'ignore-case)