### DISABLED FOR NOW # add new dir to CVS if ($nocvs) { warn "\nNOTE: Because you passed the -C argument, you will have\n" . "to add this new class to cvs by hand.\n"; } elsif (-d catfile($edir, updir(), 'CVS')) { cvs_add($edir); } else { warn "\nNOTE: An intermdiate directory is not already part of cvs\n" . "repository. You will have to handle the cvs add's for this\n" . "new class by hand.\n"; $nocvs = 1; }