From 033ecf787a3e1a250a43d179dec788f6c90c0482 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Thu, 16 Nov 2006 09:07:16 +0000 Subject: [PATCH] (ido-file-internal): Use current buffer's file name as default choice for ido-find-alternate-file. Suggested by Matt Hodges. --- lisp/ido.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/ido.el b/lisp/ido.el index 97e285916d6..8844b12f5b7 100644 --- a/lisp/ido.el +++ b/lisp/ido.el @@ -2270,7 +2270,9 @@ If INITIAL is non-nil, it specifies the initial input string." (let ((minibuffer-completing-file-name t)) (setq filename (ido-read-internal item (or prompt "Find file: ") - 'ido-file-history nil nil initial)))) + 'ido-file-history + (and (eq method 'alt-file) buffer-file-name) + nil initial)))) ;; Choose the file name: either the text typed in, or the head ;; of the list of matches -- 2.39.5