diff options
| -rw-r--r-- | lisp/vc.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index 6ac48e2d367..5b9de8bb486 100644 --- a/lisp/vc.el +++ b/lisp/vc.el | |||
| @@ -95,8 +95,9 @@ value of this flag.") | |||
| 95 | (defvar vc-checkout-switches nil | 95 | (defvar vc-checkout-switches nil |
| 96 | "*Extra switches passed to the checkout program by \\[vc-checkout].") | 96 | "*Extra switches passed to the checkout program by \\[vc-checkout].") |
| 97 | (defvar vc-path | 97 | (defvar vc-path |
| 98 | (if (file-exists-p "/usr/sccs") | 98 | (if (file-directory-p "/usr/sccs") |
| 99 | '("/usr/sccs") nil) | 99 | '("/usr/sccs") |
| 100 | nil) | ||
| 100 | "*List of extra directories to search for version control commands.") | 101 | "*List of extra directories to search for version control commands.") |
| 101 | (defvar vc-directory-exclusion-list '("SCCS" "RCS") | 102 | (defvar vc-directory-exclusion-list '("SCCS" "RCS") |
| 102 | "*Directory names ignored by functions that recursively walk file trees.") | 103 | "*Directory names ignored by functions that recursively walk file trees.") |