diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-11-14 09:41:22 +0100 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-11-14 09:41:22 +0100 |
commit | 06632fbaf81900143aec988a846ee18e33a85e50 (patch) | |
tree | 8b41d52ee9b3b59c3d5736cedfdbaad05b0c158b /lisp/vc/vc-sccs.el | |
parent | 370d4038c5a671d3b9e3a4d28d849948c1a96f53 (diff) | |
download | emacs-06632fbaf81900143aec988a846ee18e33a85e50.tar.gz |
Fix previous -responsible-p change
* lisp/vc/vc-sccs.el (vc-sccs-responsible-p):
* lisp/vc/vc-rcs.el (vc-rcs-responsible-p):
* lisp/vc/vc-cvs.el (vc-cvs-responsible-p): Make the previous
change work with relative file names, too.
Diffstat (limited to 'lisp/vc/vc-sccs.el')
-rw-r--r-- | lisp/vc/vc-sccs.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc/vc-sccs.el b/lisp/vc/vc-sccs.el index d59ccb37b3b..4b56fbf28ef 100644 --- a/lisp/vc/vc-sccs.el +++ b/lisp/vc/vc-sccs.el @@ -216,7 +216,7 @@ to the SCCS command." ;; TODO: check for all the patterns in vc-sccs-master-templates (or (and (file-directory-p (expand-file-name "SCCS" (file-name-directory file))) - file) + (file-name-directory file)) (let ((dir (vc-sccs-search-project-dir (or (file-name-directory file) "") (file-name-nondirectory file)))) (and (stringp dir) |