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
}
$worrycount++ if (scanlib::check_worry($scanlib::bugs{$nr}));
}
-
- if (defined($scanlib::comments{$p}) && $scanlib::comments{$p} =~ m/^\[REMOVE\]/) {
- $removecount += scalar @{$scanlib::packagelist{$p}};
- }
}
-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);
my $nr; # Current bugnumber
my $sect; # BTS-subsection for bugnumber
my $header; # Flag if packagename has already been printed
- my $fontset; # Did we change the font?
for my $p (sort {$a cmp $b} keys %scanlib::packagelist) {
next if (defined $bugcfg::exclude{$p});
$header = 0;
- $fontset = 0;
if (defined $scanlib::comments{$p}) {
- if ($html && defined($scanlib::comments{$p})) {
- if ($scanlib::comments{$p} =~ m/^\[REMOVE\]/) {
- $fontset=1;
- print "<span style=\"color: red\">";
- }
- }
$header=1;
&PrintPackageHeader($p);
print $scanlib::comments{$p};
print "</span>" if ($html && ($scanlib::bugs{$nr} =~ m/^\[[^]]*[H+P]/ ||
$scanlib::bugs{$nr} =~ m/ \[[^]]*X/));
}
- print "</span>" if ($fontset);
if ($header) {
&PrintPackageFooter($p);
}
sub MakeStatistics() {
my $bugcount=0; # Total number of bugs so far
- my $remtotal=0; # Total number of bugs for packages marked REMOVE
my $patchtotal=0; # Total number of bugs marked patch
my $pendingtotal=0; # Total number of bugs marked pending
my $ignoretotal=0; # Total number of bugs marked ignore
$count++;
}
}
- $remtotal+=$count if (defined($scanlib::comments{$p}) && $scanlib::comments{$p} =~ m/^\[REMOVE\]/);
}
if ($html) {
print "<strong>Total number of release-critical bugs:</strong> $bugcount<BR>\n";
- printf("<strong>Number that will disappear after removing packages marked [REMOVE]:</strong> %d<BR>\n", $remtotal);
printf("<strong>Number that have a patch:</strong> %d<BR>\n", $patchtotal);
printf("<strong>Number that have a fix prepared and waiting to upload:</strong> %d<BR>\n", $pendingtotal);
printf("<strong>Number that are being ignored:</strong> %d<BR>\n", $ignoretotal);
printf("<strong>Number concerning the next release (excluding ignored and not-in-testing):</strong> %d<P>\n", $worrytotal);
} else {
print "Total number of release-critical bugs: $bugcount\n";
- printf("Number that will disappear after removing packages marked [REMOVE]: %d\n", $remtotal);
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);
./bugreport -H -s $filter
cat <<EOF
-<p>
-Explanation for comment tags:
-<ul>
- <li><strong>[FIX]</strong>: describes a simple method to deal with
- the bug.
- <li><strong>[STRATEGY]</strong>: describes a possible approach for
- fixing the bug.
- <li><strong>[HELP]</strong>: help is needed to fix this bug.
- <li><strong>[REMOVE]</strong>: package will be removed if bug is not fixed
-</ul>
-
<p>
Explanation for <a href="http://www.debian.org/Bugs/Developer#tags">bug
tags</a>: