for my $dir (AutoGen::_cvsdirs($cvsdir)) {
my @cleanfilesfordir=AutoGen::_cleanfilesfordir $dir,@cleanfiles;
AutoGen::_writefile $dir."/.cvsignore",map("$_\n",@cleanfilesfordir);
for my $dir (AutoGen::_cvsdirs($cvsdir)) {
my @cleanfilesfordir=AutoGen::_cleanfilesfordir $dir,@cleanfiles;
AutoGen::_writefile $dir."/.cvsignore",map("$_\n",@cleanfilesfordir);