From: Kim F. Storm <storm@cua.dk>
Date: Thu, 4 Sep 2008 10:01:45 +0000 (+0000)
Subject: (ido-buffer-internal, ido-file-internal): Pass on other-window
X-Git-Tag: emacs-pretest-23.0.90~3048
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7d046dbbac5a3e38093b90fe49e77c3323369615;p=emacs.git

(ido-buffer-internal, ido-file-internal): Pass on other-window
and other-frame methods when switching between file and buffer modes.
---

diff --git a/lisp/ido.el b/lisp/ido.el
index fd0e6b2f7aa..dbf6cb87801 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2161,7 +2161,9 @@ If cursor is not at the end of the user input, move to end of input."
 
       (cond
        ((eq ido-exit 'find-file)
-	(ido-file-internal ido-default-file-method nil nil nil nil ido-text))
+	(ido-file-internal
+	 (if (memq method '(other-window other-frame)) method ido-default-file-method)
+	 nil nil nil nil ido-text))
 
        ((eq ido-exit 'insert-file)
 	(ido-file-internal 'insert 'insert-file nil "Insert file: " nil ido-text 'ido-enter-insert-buffer))
@@ -2317,7 +2319,9 @@ If cursor is not at the end of the user input, move to end of input."
 	  (call-interactively this-command)))
 
        ((eq ido-exit 'switch-to-buffer)
-	(ido-buffer-internal ido-default-buffer-method nil nil nil ido-text))
+	(ido-buffer-internal
+	 (if (memq method '(other-window other-frame)) method ido-default-buffer-method)
+	 nil nil nil ido-text))
 
        ((eq ido-exit 'insert-buffer)
 	(ido-buffer-internal 'insert 'insert-buffer "Insert buffer: " nil ido-text 'ido-enter-insert-file))