Parent Directory | Revision Log | Patch
--- perl/modperl/trunk/lib/ModPerl/Manifest.pm 2005/03/22 02:43:50 158530 +++ perl/modperl/trunk/lib/ModPerl/Manifest.pm 2005/03/22 03:43:15 158531 @@ -50,6 +50,7 @@ sub get_svn_files { while (my $line = <$fh>) { if ($line =~ /name\s*=\s*"([^"]*)"/) { my $file = $1; + next if $file eq 'svn:this_dir'; next if !$file or -d "../$file" or $file =~ /^\./; push @files, $dir ? "$dir/$file" : $file; }
infrastructure at apache.org | ViewVC Help |
Powered by ViewVC 1.1.26 |