scanlib::readcomments($commentsfile);
my $total=0; # total number of bugs
-my $removecount=0; # Number of bugs that will disappear if packages are removed
my $patchcount=0; # Number of bugs that have a fix proposed
my $pendingcount=0; # Number of bugs that will have a fix uploaded RSN
my $ignorecount=0; # Number of bugs being ignored
my $sect = ($scanlib::comments{$nr} =~ m/\[([^]]*)\]/);
$sectcount{$sect}++;
}
- unless ($scanlib::bugs{$nr} =~ m/^\[[^]]*I/ or
- $scanlib::bugs{$nr} =~ m/ \[[^]]*X/ or
- ($scanlib::bugs{$nr} =~ m/ \[[^]]*[OSUE]/ and $scanlib::bugs{$nr} !~ m/ \[[^]]*T/)) {
- $worrycount++;
- # print STDERR "$nr $bugs{$nr}\n";
- }
- }
-
- if (defined($scanlib::comments{$p}) && $scanlib::comments{$p} =~ m/^\[REMOVE\]/) {
- $removecount += scalar @{$scanlib::packagelist{$p}};
+ $worrycount++ if (scanlib::check_worry($scanlib::bugs{$nr}));
}
}
-printf("%d %d %d %d %d %d %d\n", $total, $pendingcount, $patchcount, $removecount, $ignorecount, $nottestingcount, $worrycount);
+printf("%d %d %d 0 %d %d %d\n", $total, $pendingcount, $patchcount, $ignorecount, $nottestingcount, $worrycount);