X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=bugcounts;fp=bugcounts;h=b0337fc01d7f68a7c88f605e54cafc3de4f3d7f6;hp=46cdf368535e6e54a08dd6f6268bd8befcf65990;hb=1d48352df6dd715ee357af799781e5a5b1439190;hpb=422b855a8e5404520d38492d16166a442bc41906

diff --git a/bugcounts b/bugcounts
index 46cdf36..b0337fc 100755
--- a/bugcounts
+++ b/bugcounts
@@ -64,12 +64,7 @@ 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\]/) {