From: Don Armstrong <don@donarmstrong.com>
Date: Fri, 3 May 2013 18:22:09 +0000 (-0700)
Subject: skip bugs which have already been counted while counting bugs; thanks to  Tony Groves... 
X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=commitdiff_plain;h=906b485b9663e38cd761f656353251dc3a18f454

skip bugs which have already been counted while counting bugs; thanks to  Tony Groves for pointing this out.
---

diff --git a/bugreport b/bugreport
index 67ecf93..49bcc92 100755
--- a/bugreport
+++ b/bugreport
@@ -135,11 +135,15 @@ sub MakeStatistics() {
 	my $worrytotal=0;	# Total number of bugs we're actually worried about
 	my $stabletotal=0;	# Total number of bugs affecting stable
 	my %list;		# List of bugnumber associated with package
+        my %seen_bugs;          # bugs which have already been counted
 
 	for my $p (sort keys %scanlib::packagelist) {
 		my $count = 0;		# Number of bugs for this package
 
 		for my $nr (@{$scanlib::packagelist{$p}}) {
+                    # if we've already counted this bug, we don't want to count it again
+                    next if $seen_bugs{$nr};
+                    $seen_bugs{$nr} = 1;
 			$pendingtotal++ if ($scanlib::bugs{$nr}->{'pending'});
 			$patchtotal++ if ($scanlib::bugs{$nr}->{'patch'});
 			$ignoretotal++ if ($scanlib::bugs{$nr}->{'wheezy-ignore'} || $scanlib::bugs{$nr}->{'squeeze-ignore'});