Mercurial > emacs

changeset 63124:37a47a1de226

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ido-read-file-name): Fallback to read-file-name on C-f also when reading directory name.
author Kim F. Storm <storm@cua.dk>
date Wed, 08 Jun 2005 12:00:46 +0000
parents e8e05dcc38c1
children 5e05e591718a
files lisp/ido.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ido.el	Wed Jun 08 09:49:58 2005 +0000
+++ b/lisp/ido.el	Wed Jun 08 12:00:46 2005 +0000
@@ -4193,7 +4193,9 @@
 	  (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)))
+	    (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)))