1
2@defun cvs-files directory/
3Returns a list of the local pathnames (with prefix @var{directory/}) of all
4CVS controlled files in @var{directory/} and in @var{directory/}'s subdirectories.
5@end defun
6
7
8@defun cvs-directories directory/
9Returns a list of all of @var{directory/} and all @var{directory/}'s CVS controlled
10subdirectories.
11@end defun
12
13
14@defun cvs-root path/
15Returns the (string) contents of @var{path/}CVS/Root;
16or @code{(getenv "CVSROOT")} if Root doesn't exist.
17@end defun
18
19
20@defun cvs-repository directory/
21Returns the (string) contents of @var{directory/}CVS/Root appended
22with @var{directory/}CVS/Repository; or #f if @var{directory/}CVS/Repository
23doesn't exist.
24@end defun
25
26
27@deffn {Procedure} cvs-set-root! new-root directory/
28
29Writes @var{new-root} to file CVS/Root of @var{directory/}.
30@end deffn
31
32
33@deffn {Procedure} cvs-set-roots! new-root directory/
34
35Writes @var{new-root} to file CVS/Root of @var{directory/} and all its CVS subdirectories.
36@end deffn
37
38
39@defun cvs-vet directory/
40
41Signals an error if CVS/Repository or CVS/Root files in @var{directory/} or any
42subdirectory do not match.
43@end defun
44
45