* progmodes/cfengine.el: Add CFEngine 3.x syntax highlighting and support.

[gnu-emacs] / lisp / find-file.el

diff --git a/lisp/find-file.el b/lisp/find-file.el
index 715f01b8e1784664e7eba6bc5922bbbe8b0b738b..e4285523184bc5a1900e0295adc1b3f533bc8955 100644 (file)
--- a/lisp/find-file.el
+++ b/lisp/find-file.el
@@ -494,7 +494,7 @@ If optional IN-OTHER-WINDOW is non-nil, find the file in another window."
 
             (setq name
                   (expand-file-name
-                   (read-file-name
+                   (read-directory-name
                     (format "Find or create %s in: " default-name)
                     default-directory default-name nil)))