Mercurial > emacs
changeset 80131:684473b333ab
Revert previous change.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Sat, 16 Feb 2008 20:21:16 +0000 |
parents | 72541e48d0d0 |
children | bbd6defe1e72 |
files | lisp/vc-hooks.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-hooks.el Sat Feb 16 20:20:32 2008 +0000 +++ b/lisp/vc-hooks.el Sat Feb 16 20:21:16 2008 +0000 @@ -316,7 +316,7 @@ If WITNESS if not found, return nil, otherwise return the root." ;; Represent /home/luser/foo as ~/foo so that we don't try to look for ;; witnesses in /home or in /. - (while (and (not (file-directory-p file)) (file-exists-p file)) + (while (not (file-directory-p file)) (setq file (file-name-directory (directory-file-name file)))) (setq file (abbreviate-file-name file)) (let ((root nil)