From: teranisi <teranisi>
Date: Thu, 7 Nov 2002 08:52:40 +0000 (+0000)
Subject: * wl-draft.el (wl-user-agent-compose): Delete special case for
X-Git-Tag: elmo-mark-restart~92
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=1ac14c7614975b32d078b4383b1f7e70e147a091;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 44505b6..bee6849 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 c1fbc2e..894eb81 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -2413,11 +2413,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)