my $macros_dir_default=$ENV{"HOME"}."/src/macros";
unshift @INC,$_ for $ENV{$macros_env}||$macros_dir_default;
eval "use AutoGen;1;" or die <<"HERE";
+$@
Missing "Autogen.pm". Please download the directory 'macros':
cvs -d :pserver:pserver:@{[ '@' ]}cvs.jankratochvil.net:/cvs checkout macros
and place it to '$macros_dir_default' or point \$ENV{"$macros_env"} variable there.
for my $cvsdir (@ARGV ? @ARGV : ".") {
for my $dir (AutoGen::_cvsdirs($cvsdir)) {
my @cleanfilesfordir=AutoGen::_cleanfilesfordir $dir,@cleanfiles;
- AutoGen::_writefile $dir."/.cvsignore",map("$_\n",@cleanfilesfordir);
+ AutoGen::_writefile $dir."/.cvsignore",map("$_\n",grep(!/^CVS$/,@cleanfilesfordir));
}
}