From: 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/cgi-bin/gitweb.cgi?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 + * 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)