[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/files.el,v
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/files.el,v |
Date: |
Fri, 20 Jul 2007 04:00:38 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Stefan Monnier <monnier> 07/07/20 04:00:37
Index: files.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/files.el,v
retrieving revision 1.913
retrieving revision 1.914
diff -u -b -r1.913 -r1.914
--- files.el 19 Jul 2007 03:29:47 -0000 1.913
+++ files.el 20 Jul 2007 04:00:37 -0000 1.914
@@ -720,6 +720,10 @@
;; Abbreviate, so as to stop when we cross ~/.
(dir (abbreviate-file-name (file-name-as-directory file)))
files)
+ ;; As a heuristic, we stop looking up the hierarchy of directories as
+ ;; soon as we find a directory belonging to another user. This should
+ ;; save us from looking in things like /net and /afs. This assumes
+ ;; that all the files inside a project belong to the same user.
(while (and dir (equal user (nth 2 (file-attributes dir))))
(if (setq files (directory-files dir 'full regexp))
(throw 'found (car files))
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Richard M. Stallman, 2007/07/02
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Richard M. Stallman, 2007/07/02
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Stefan Monnier, 2007/07/07
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Michael Albinus, 2007/07/08
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Miles Bader, 2007/07/09
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Michael Albinus, 2007/07/17
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Stefan Monnier, 2007/07/18
- [Emacs-diffs] Changes to emacs/lisp/files.el,v,
Stefan Monnier <=
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Nick Roberts, 2007/07/22
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Miles Bader, 2007/07/26