Mercurial > emacs

changeset 73166:7e2d2b8518f4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ido-file-internal): Only bind minibuffer-completing-file-name to t while calling ido-read-internal.
author Kim F. Storm <storm@cua.dk>
date Fri, 29 Sep 2006 12:25:35 +0000
parents deaec6fc4933
children 1b3313de1c4c
files lisp/ido.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ido.el	Fri Sep 29 12:25:23 2006 +0000
+++ b/lisp/ido.el	Fri Sep 29 12:25:35 2006 +0000
@@ -2224,7 +2224,6 @@
   (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))
@@ -2268,9 +2267,10 @@
 
       (unless filename
 	(setq ido-saved-vc-hb vc-handled-backends)
-	(setq filename (ido-read-internal item
-					  (or prompt "Find file: ")
-					  'ido-file-history nil nil initial)))
+	(let ((minibuffer-completing-file-name t))
+	  (setq filename (ido-read-internal item
+					    (or prompt "Find file: ")
+					    'ido-file-history nil nil initial))))
 
       ;; Choose the file name: either the text typed in, or the head
       ;; of the list of matches