Index: emacs/lisp/ido.el
diff -c emacs/lisp/ido.el:1.59 emacs/lisp/ido.el:1.60
*** emacs/lisp/ido.el:1.59 Mon Jun 6 12:48:02 2005
--- emacs/lisp/ido.el Wed Jun 8 12:00:46 2005
***************
*** 4193,4199 ****
(eq (get this-command 'ido) 'dir)
(memq this-command ido-read-file-name-as-directory-commands))
(setq filename
! (ido-read-directory-name prompt dir default-filename mustmatch
initial)))
((and (not (eq (get this-command 'ido) 'ignore))
(not (memq this-command ido-read-file-name-non-ido))
(or (null predicate) (eq predicate 'file-exists-p)))
--- 4193,4201 ----
(eq (get this-command 'ido) 'dir)
(memq this-command ido-read-file-name-as-directory-commands))
(setq filename
! (ido-read-directory-name prompt dir default-filename mustmatch
initial))
! (if (eq ido-exit 'fallback)
! (setq filename 'fallback)))
((and (not (eq (get this-command 'ido) 'ignore))
(not (memq this-command ido-read-file-name-non-ido))
(or (null predicate) (eq predicate 'file-exists-p)))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
