Index: emacs/lisp/ido.el
diff -c emacs/lisp/ido.el:1.68 emacs/lisp/ido.el:1.69
*** emacs/lisp/ido.el:1.68 Fri Jul 15 12:53:17 2005
--- emacs/lisp/ido.el Fri Jul 15 13:09:03 2005
***************
*** 2023,2029 ****
(setq item 'file))
(let ((ido-current-directory (ido-expand-directory default))
(ido-context-switch-command switch-cmd)
! ido-directory-nonreadable ido-directory-too-big
filename)
(if (or (not ido-mode) (ido-is-slow-ftp-host))
--- 2023,2030 ----
(setq item 'file))
(let ((ido-current-directory (ido-expand-directory default))
(ido-context-switch-command switch-cmd)
! ido-directory-nonreadable ido-directory-too-big
! (minibuffer-completing-file-name t)
filename)
(if (or (not ido-mode) (ido-is-slow-ftp-host))
***************
*** 4250,4255 ****
--- 4251,4257 ----
(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,4287 ****
--- 4284,4290 ----
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))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
