changeset 99534:570afde3c5a3

(project-find-settings-file): Fix last change.
author Chong Yidong <cyd@stupidchicken.com>
date Thu, 13 Nov 2008 17:04:53 +0000
parents 53e1b713e51f
children aa3735d1a6b8
files lisp/files.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Thu Nov 13 16:01:47 2008 +0000
+++ b/lisp/files.el	Thu Nov 13 17:04:53 2008 +0000
@@ -3222,7 +3222,8 @@
     (let* ((settings (locate-dominating-file file project-settings-file))
 	   (pda nil))
       ;; `locate-dominating-file' may have abbreviated the name.
-      (if settings (setq settings (expand-file-name ".dir-settings.el" settings)))
+      (if settings
+	  (setq settings (expand-file-name project-settings-file settings)))
       (dolist (x project-directory-alist)
 	(when (and (eq t (compare-strings file nil (length (car x))
 					  (car x) nil nil))