lintian: r1393 - in trunk/reporting: . templates

[djpig@debian.org]

Author: djpig
Date: 2008-06-18 23:48:41 +0200 (Wed, 18 Jun 2008)
New Revision: 1393

Modified:
   trunk/reporting/lintian.css
   trunk/reporting/templates/tag.tmpl
Log:
* reporting/templates/tag.tmpl:
  + Mark overridden tags.


Modified: trunk/reporting/lintian.css
===================================================================
--- trunk/reporting/lintian.css	2008-06-18 20:36:36 UTC (rev 1392)
+++ trunk/reporting/lintian.css	2008-06-18 21:48:41 UTC (rev 1393)
@@ -39,7 +39,6 @@
     margin: 0;
     padding: 0;
     color: #222;
-    background-color: white;
     font-family: sans-serif;
 }
 
@@ -285,6 +284,10 @@
     background-color: #DDD;
 }
 
+li.type-O {
+    color: #444;
+}
+
 blockquote {
     padding: 6px 16px;
     background-color: #EEE;

Modified: trunk/reporting/templates/tag.tmpl
===================================================================
--- trunk/reporting/templates/tag.tmpl	2008-06-18 20:36:36 UTC (rev 1392)
+++ trunk/reporting/templates/tag.tmpl	2008-06-18 21:48:41 UTC (rev 1393)
@@ -21,16 +21,29 @@
     # We get a list of tag data.  We create a separate paragraph for each
     # package name.
     my $last = '';
+    my $tag = '';
+    my $has_nonoverridden = 0;
     for my $info (sort { $a->{package} cmp $b->{package} } @tags) {
-        my $id = "$info->{package} $info->{type}";
+	my $id = "$info->{package} $info->{type}";
         if ($id ne $last) {
-            $OUT .= "</ul>\n" if $last;
-            $OUT .= qq(  <h2 class="tag"><a href="../full/$info->{xref}">);
-            $OUT .= "$info->{package}</a> ($info->{type})</h2>\n";
-            $OUT .= qq(  <ul class="tag">\n);
-            $last = $id;
-        }
-        $OUT .= "<li>$info->{extra}</li>\n" if $info->{extra};
+	    if ($tag) {
+		my $overridden = $has_nonoverridden ? '' : qq{<span class="type-O">O</span> };
+		$OUT .= qq(  <h2 class="tag">$overridden<a href="../full/$info->{xref}">);
+		$OUT .= "$info->{package}</a> ($info->{type})</h2>\n";
+        	$OUT .= qq(  <ul class="tag">\n);
+	    }
+	    $OUT .= $tag;
+	    $OUT .= "</ul>\n";
+	    $last = $id;
+	    $tag = '';
+	    $has_nonoverridden = 0;
+	}
+	$has_nonoverridden = 1 if $info->{code} ne 'O';
+	if ($info->{extra}) {
+	    $tag .= qq{    <li class="type-$info->{code}">};
+	    $tag .= qq{<span class="type-O">O</span> } if $info->{code} eq 'O';
+	    $tag .= "$info->{extra}</li>\n";
+	}
     }
     $OUT .= "  </ul>\n";
 }