Mercurial > emacs
comparison lisp/vc-cvs.el @ 91956:7bc22dad5f9a
Make sure all backends support vc-BACKEND-root.
* vc-hooks.el (vc-find-root): Take optional arg INVERT.
If non-nil, reverse the sense of the check.
* vc-rcs.el (vc-rcs-root): New func.
* vc-cvs.el (vc-cvs-root): New func.
* vc-svn.el (vc-svn-root): New func.
author | Thien-Thi Nguyen <ttn@gnuvola.org> |
---|---|
date | Tue, 19 Feb 2008 11:43:17 +0000 |
parents | 28dc34f6a246 |
children | 12326ccb66d6 |
comparison
equal
deleted
inserted
replaced
91955:e3aedad81f5f | 91956:7bc22dad5f9a |
---|---|
730 | 730 |
731 | 731 |
732 ;;; | 732 ;;; |
733 ;;; Internal functions | 733 ;;; Internal functions |
734 ;;; | 734 ;;; |
735 | |
736 (defun vc-cvs-root (dir) | |
737 (vc-find-root dir "CVS" t)) | |
735 | 738 |
736 (defun vc-cvs-command (buffer okstatus files &rest flags) | 739 (defun vc-cvs-command (buffer okstatus files &rest flags) |
737 "A wrapper around `vc-do-command' for use in vc-cvs.el. | 740 "A wrapper around `vc-do-command' for use in vc-cvs.el. |
738 The difference to vc-do-command is that this function always invokes `cvs', | 741 The difference to vc-do-command is that this function always invokes `cvs', |
739 and that it passes `vc-cvs-global-switches' to it before FLAGS." | 742 and that it passes `vc-cvs-global-switches' to it before FLAGS." |