my $header; # Flag if packagename has already been printed
for my $p (sort {$a cmp $b} keys %scanlib::packagelist) {
my $header; # Flag if packagename has already been printed
for my $p (sort {$a cmp $b} keys %scanlib::packagelist) {
- $pendingtotal++ if ($scanlib::bugs{$nr} =~ m/^\[[^]]*P/);
- $patchtotal++ if ($scanlib::bugs{$nr} =~ m/^\[[^]]*\+/);
- $ignoretotal++ if ($scanlib::bugs{$nr} =~ m/^\[[^]]*I/);
+ $pendingtotal++ if ($scanlib::bugs{$nr}->{'pending'});
+ $patchtotal++ if ($scanlib::bugs{$nr}->{'patch'});
+ $ignoretotal++ if ($scanlib::bugs{$nr}->{'sarge-ignore'} || $scanlib::bugs{$nr}->{'etch-ignore'});
$worrytotal++ if (scanlib::check_worry($scanlib::bugs{$nr}));
$stabletotal++ if (scanlib::check_worry_stable($scanlib::bugs{$nr}));
$worrytotal++ if (scanlib::check_worry($scanlib::bugs{$nr}));
$stabletotal++ if (scanlib::check_worry_stable($scanlib::bugs{$nr}));
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 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);