Conservancy/gpl-compliance-tools
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Print out in stdout what directories are being compared.

Browse source
This commit is contained in:
Bradley M. Kuhn 2014-02-20 09:26:29 -05:00
parent 65cab7dfc0
commit e2b2aa4639
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
hierarchy-comparison
View file

@ -116,6 +116,12 @@ my $comparedTempFile = $comparedTempFH->filename;
# First, look for directory differences # First, look for directory differences
print "Comparing $origDir to $comparedDir";
if (defined $ignoreRegex and $ignoreRegex !~ /^\s*$/) {
print ", excluding excluding all files matching this RE: $ignoreRegex\n";
} else {
print "\n";
}
print "Doing directory comparison: "; print "Doing directory comparison: ";
my(@orgNonRegular) = FindAndSortOutput("NON-REGULAR", $origDir, $origTempFH, my(@orgNonRegular) = FindAndSortOutput("NON-REGULAR", $origDir, $origTempFH,