Fixing issue where excluded files aren't excluded if they end in .pl or
.cgi. git-svn-id: svn://10.0.0.236/trunk@104720 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
@@ -41,6 +41,11 @@ $file = '*';
|
||||
|
||||
sub isTestingFile {
|
||||
my ($file) = @_;
|
||||
my $exclude;
|
||||
foreach $exclude (@exclude_files) {
|
||||
if ($file eq $exclude) { return undef; } # get rid of excluded files.
|
||||
}
|
||||
|
||||
if ($file =~ /\.cgi$|\.pl$/) {
|
||||
return 1;
|
||||
}
|
||||
@@ -48,10 +53,6 @@ sub isTestingFile {
|
||||
foreach $additional (@additional_files) {
|
||||
if ($file eq $additional) { return 1; }
|
||||
}
|
||||
my $exclude;
|
||||
foreach $exclude (@exclude_files) {
|
||||
if ($file eq $exclude) { return undef; } # get rid of excluded files.
|
||||
}
|
||||
return undef;
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user