X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=bugcounts;h=b0337fc01d7f68a7c88f605e54cafc3de4f3d7f6;hp=f3913ee91b851e60819fd5f6e2c2072c177946bb;hb=1d48352df6dd715ee357af799781e5a5b1439190;hpb=038c6aa61e809657e74971f8fe72a56fe57551a7 diff --git a/bugcounts b/bugcounts index f3913ee..b0337fc 100755 --- a/bugcounts +++ b/bugcounts @@ -64,16 +64,11 @@ for my $p (keys %scanlib::packagelist) { 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"; - } + $worrycount++ if (scanlib::check_worry($scanlib::bugs{$nr})); } if (defined($scanlib::comments{$p}) && $scanlib::comments{$p} =~ m/^\[REMOVE\]/) { - $removecount += scalar @{$scanlib::packagelist{$p}); + $removecount += scalar @{$scanlib::packagelist{$p}}; } }