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