Mercurial > emacs

diff lisp/dired.el @ 94651:e8c7fc7ef92b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(dired-read-dir-and-switches): Fix up last change.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 06 May 2008 00:51:56 +0000
parents 4ee3432d1e09
children ee5932bf781d
line wrap: on
line diff
--- a/lisp/dired.el	Tue May 06 00:37:31 2008 +0000
+++ b/lisp/dired.el	Tue May 06 00:51:56 2008 +0000
@@ -606,9 +606,12 @@
         (minibuffer-with-setup-hook
             (lambda ()
               (setq minibuffer-default default)
-              (setq minibuffer-completing-file-name t)
-              (setq completion-ignore-case
-                    read-file-name-completion-ignore-case)
+              (set (make-local-variable 'minibuffer-completing-file-name)
+                   ;; t means "from now until the next minibuffer", whereas
+                   ;; `lambda' means "only here".
+                   'lambda)
+              (set (make-local-variable 'completion-ignore-case)
+                   read-file-name-completion-ignore-case)
               (setq default-directory defdir))
           (substitute-in-file-name
            (completing-read