releaseAutomation/mercurialComparison.pl
changeset 107 b51d77004ea8
parent 87 97b833888afe
child 143 e4ad889f1aa5
--- a/releaseAutomation/mercurialComparison.pl	Mon Nov 09 14:58:53 2009 +0000
+++ b/releaseAutomation/mercurialComparison.pl	Mon Nov 09 15:04:58 2009 +0000
@@ -65,16 +65,7 @@
 	$cookedData{$datum->{Package}}->{same} += $datum->{Count} if $datum->{Change} eq "same";
 	$cookedData{$datum->{Package}}->{addRemove} += $datum->{Count} if $datum->{Change} =~ m{^[AR]$};
 }
-# Add the "exception" packages
-foreach my $package (@pkgErrors)
-{
-	chomp $package;
-	$package =~ s{No valid comparison for }{};
-	$cookedData{$package}->{exception} = "* Package is brand new, or converted from SFL -> EPL, or has transitioned from FCL back to MCL (not covered in this section)\n";
-}
-
 # Cut-off for "interesting" packages
-
 foreach my $package (keys %cookedData)
 {
 	# Ensure items are defined
@@ -82,14 +73,11 @@
 	$cookedData{$package}->{same} |= 0;
 	$cookedData{$package}->{addRemove} |= 0;
 	$cookedData{$package}->{percentChurn} = 100 * (1 - ($cookedData{$package}->{same} / $cookedData{$package}->{totalFiles}));
-	$cookedData{$package}->{exception} |= "";
 	
 	# More than N files added + removed
 	next if $cookedData{$package}->{addRemove} >= 400;
 	# More than M% churn
 	next if $cookedData{$package}->{percentChurn} > 30;
-	# Unable to compare at all
-	next if $cookedData{$package}->{exception};
 	# Nothing interesting about this package
 	delete $cookedData{$package};
 }
@@ -102,7 +90,7 @@
 
 * $cookedData{$package}->{addRemove} files added/removed
 * $cookedData{$package}->{percentChurn}% churn
-$cookedData{$package}->{exception}
+
 # Cause1
 # etc