Mercurial > emacs

changeset 98392:7c5cb1da6c7f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(locate-dominating-file): Take file-attributes of `dir', not of `file' (which never changes).
author Eli Zaretskii <eliz@gnu.org>
date Mon, 29 Sep 2008 11:30:03 +0000
parents 827691e8a15e
children e2ffa2e0c265
files lisp/files.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Mon Sep 29 05:42:20 2008 +0000
+++ b/lisp/files.el	Mon Sep 29 11:30:03 2008 +0000
@@ -732,7 +732,7 @@
                   ;; things like /net and /afs.  This assumes that all the
                   ;; files inside a project belong to the same user.
                   (let ((prev-user user))
-                    (setq user (nth 2 (file-attributes file)))
+                    (setq user (nth 2 (file-attributes dir)))
                     (or (null prev-user) (equal user prev-user))))
         (if (setq files (and (file-directory-p dir)
                              (directory-files dir 'full regexp)))