Mercurial > emacs
changeset 10953:ba4240ca6b99
(vc-path): Use /usr/sccs only if it is a dir.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 11 Mar 1995 02:17:04 +0000 |
| parents | 6069707b1151 |
| children | d9ab06338f6a |
| files | lisp/vc.el |
| diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc.el Sat Mar 11 02:05:20 1995 +0000 +++ b/lisp/vc.el Sat Mar 11 02:17:04 1995 +0000 @@ -95,8 +95,9 @@ (defvar vc-checkout-switches nil "*Extra switches passed to the checkout program by \\[vc-checkout].") (defvar vc-path - (if (file-exists-p "/usr/sccs") - '("/usr/sccs") nil) + (if (file-directory-p "/usr/sccs") + '("/usr/sccs") + nil) "*List of extra directories to search for version control commands.") (defvar vc-directory-exclusion-list '("SCCS" "RCS") "*Directory names ignored by functions that recursively walk file trees.")