X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=bugreport;h=b68a6c65bbba7e644beb68512d177e74b0a9fba9;hp=1fe0ffa24e1d9a331edb085e500f2ccb22c643e9;hb=bc60819259a8752346501fcfada3cf54b974fd0d;hpb=1d97221130ca457ad6aeccd8b7e381860a8db706 diff --git a/bugreport b/bugreport index 1fe0ffa..b68a6c6 100755 --- a/bugreport +++ b/bugreport @@ -136,6 +136,7 @@ sub MakeStatistics { my $ignoretotal=0; # Total number of bugs marked ignore my $worrytotal=0; # Total number of bugs we're actually worried about my $stabletotal=0; # Total number of bugs affecting stable + my $oldstabletotal=0; # Total number of bugs affecting oldstable my %list; # List of bugnumber associated with package my %seen_bugs; # bugs which have already been counted @@ -159,13 +160,13 @@ sub MakeStatistics { } if ($html) { - print "Total number of release-critical bugs: $bugcount
\n"; + print "Total number of release-critical bugs: $bugcount
\n"; printf("Number that have a patch: %d
\n", $patchtotal); printf("Number that have a fix prepared and waiting to upload: %d
\n", $pendingtotal); printf("Number that are being ignored: %d
\n", $ignoretotal); - printf("Number concerning the current stable release: %d
\n", $stabletotal); - printf("Number concerning the next release: %d

\n", $worrytotal); - printf("Number concerning the previous stable release: %d

\n", $oldstabletotal); + printf("Number concerning the current stable release: %d
\n", $stabletotal); + printf("Number concerning the next release: %d

\n", $worrytotal); + printf("Number concerning the previous stable release: %d

\n", $oldstabletotal); } else { print "Total number of release-critical bugs: $bugcount\n"; printf("Number that have a patch: %d\n", $patchtotal); @@ -199,7 +200,7 @@ sub FilterBugsStable() { $scanlib::packagelist{$p} = [ grep { scanlib::check_worry_stable($scanlib::bugs{$_}) } @{$scanlib::packagelist{$p}} ]; delete $scanlib::packagelist{$p} if (scalar @{$scanlib::packagelist{$p}} == 0); } - +} sub FilterBugsOldStable() { for my $p (sort keys %scanlib::packagelist) { $scanlib::packagelist{$p} = [ grep { scanlib::check_worry_oldstable($scanlib::bugs{$_}) } @{$scanlib::packagelist{$p}} ];