if ($html) {
my $worry = scanlib::check_worry($scanlib::bugs{$nr});
- if ($scanlib::bugs{$nr} =~ m/ \[[^]]*X/) {
- print '<span style="color: #808080">';
- } elsif ($scanlib::bugs{$nr} =~ m/^\[[^]]*P/) {
+ if ($scanlib::bugs{$nr}->{'pending'}) {
print '<span style="color: #f040d0">';
- } elsif ($scanlib::bugs{$nr} =~ m/^\[[^]]*\+/) {
+ } elsif ($scanlib::bugs{$nr}->{'patch'}) {
print '<span style="color: #00aa00">';
- } elsif ($scanlib::bugs{$nr} =~ m/^\[[^]]*H/) {
+ } elsif ($scanlib::bugs{$nr}->{'help'}) {
print '<span style="color: #ffaa30">';
}
- print "<strike>" if ($scanlib::bugs{$nr} =~ m/^\[.......I\]/);
+ print "<strike>" if ($scanlib::bugs{$nr}->{'sarge-ignore'} || $scanlib::bugs{$nr}->{'etch-ignore'});
print "<em class=\"worry\">" if $worry;
($sect=$nr) =~ s/([0-9]{2}).*/$1/;
- print "<A NAME=\"$nr\"></A> " . scanlib::wwwnumber($nr) . ' ' .
- scanlib::htmlsanit($scanlib::bugs{$nr}) . "\n";
+ printf "<A NAME=\"$nr\"></A> %s [%s] [%s] %s\n", scanlib::wwwnumber($nr),
+ scanlib::get_taginfo($scanlib::bugs{$nr}),
+ scanlib::get_relinfo($scanlib::bugs{$nr}),
+ scanlib::htmlsanit($scanlib::bugs{$nr}->{'subject'});
print "</em>" if $worry;
- print "</strike>" if ($scanlib::bugs{$nr} =~ m/^\[.......I\]/);
+ print "</strike>" if ($scanlib::bugs{$nr}->{'sarge-ignore'} || $scanlib::bugs{$nr}->{'etch-ignore'});
} else {
- printf(" %-6d %s\n", $nr, $scanlib::bugs{$nr});
+ printf(" %-6d [%s] [%s] %s\n", $nr, scanlib::get_taginfo($scanlib::bugs{$nr}),
+ scanlib::get_relinfo($scanlib::bugs{$nr}), $scanlib::bugs{$nr}->{'subject'});
}
- print "</span>" if ($html && ($scanlib::bugs{$nr} =~ m/^\[[^]]*[H+P]/ ||
- $scanlib::bugs{$nr} =~ m/ \[[^]]*X/));
+ print "</span>" if ($html && ($scanlib::bugs{$nr}->{'pending'} ||
+ $scanlib::bugs{$nr}->{'patch'} ||
+ $scanlib::bugs{$nr}->{'help'}));
}
if ($header) {
&PrintPackageFooter($p);