From 0217db758fa946c9cc753a0a92a93fc9e7f89936 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sesse@rietz>
Date: Thu, 22 Mar 2007 18:18:03 +0000
Subject: [PATCH] Make bugreport output meaningful stuff again.

---
 bugreport | 26 ++++++++++++++------------
 1 file changed, 14 insertions(+), 12 deletions(-)

diff --git a/bugreport b/bugreport
index ebd7b1f..5c27be9 100755
--- a/bugreport
+++ b/bugreport
@@ -95,27 +95,29 @@ sub MakeBuglist() {
 			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);
-- 
2.39.2