Remove the notice about the beta; we _are_ the beta :-)

[bugscan.git] / bugcounts

diff --git a/bugcounts b/bugcounts
index 8792983eaa70c24f356d636a9586c40568332eb7..046f294b503e12fb22d5ffe99185f2526115fce7 100755 (executable)
--- a/bugcounts
+++ b/bugcounts
@@ -60,10 +60,12 @@ for $p (keys %packagelist) {
                        ($sect) = ($comments{$nr} =~ m/\[([^]]*)\]/);
                        $sectcount{$sect}++;
                }
-               $worrycount++ unless (
-                       $bugs{$nr} =~ m/^\[[^]]*I/ or
+               unless ($bugs{$nr} =~ m/^\[[^]]*I/ or
                        $bugs{$nr} =~ m/ \[[^]]*X/ or
-                       ($bugs{$nr} =~ m/ \[[^]]*[OSUE]/ and $bugs{$nr} !~ m/ \[[^]]*T/));
+                       ($bugs{$nr} =~ m/ \[[^]]*[OSUE]/ and $bugs{$nr} !~ m/ \[[^]]*T/)) {
+                       $worrycount++;
+                       # print STDERR "$nr $bugs{$nr}\n";
+               }       
        }
 
        if (defined($comments{$p}) && $comments{$p} =~ m/^\[REMOVE\]/) {