Mercurial > emacs
changeset 64343:6e19d6e25256
(ido-file-internal, ido-read-file-name, ido-read-directory-name):
Let bind minibuffer-completing-file-name to t.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Fri, 15 Jul 2005 13:09:03 +0000 |
| parents | 4546132eb60b |
| children | d248066aa841 |
| files | lisp/ido.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ido.el Fri Jul 15 13:08:43 2005 +0000 +++ b/lisp/ido.el Fri Jul 15 13:09:03 2005 +0000 @@ -2023,7 +2023,8 @@ (setq item 'file)) (let ((ido-current-directory (ido-expand-directory default)) (ido-context-switch-command switch-cmd) - ido-directory-nonreadable ido-directory-too-big + ido-directory-nonreadable ido-directory-too-big + (minibuffer-completing-file-name t) filename) (if (or (not ido-mode) (ido-is-slow-ftp-host)) @@ -4250,6 +4251,7 @@ (ido-context-switch-command (if (eq (get this-command 'ido) 'find-file) nil 'ignore)) (vc-handled-backends (and (boundp 'vc-handled-backends) vc-handled-backends)) + (minibuffer-completing-file-name t) (ido-current-directory (ido-expand-directory dir)) (ido-directory-nonreadable (not (file-readable-p ido-current-directory))) (ido-directory-too-big (and (not ido-directory-nonreadable) @@ -4282,6 +4284,7 @@ Read directory name, prompting with PROMPT and completing in directory DIR. See `read-directory-name' for additional parameters." (let* (filename + (minibuffer-completing-file-name t) (ido-context-switch-command 'ignore) ido-saved-vc-hb (ido-current-directory (ido-expand-directory dir))