Adding side stream changes to Maemian. Working to integrate full upstream libraries...

[maemian] / nokia-lintian / reporting / templates / packages.tmpl

diff --git a/nokia-lintian/reporting/templates/packages.tmpl b/nokia-lintian/reporting/templates/packages.tmpl
new file mode 100644 (file)
index 0000000..31c6ef2
--- /dev/null
+++ b/nokia-lintian/reporting/templates/packages.tmpl
@@ -0,0 +1,32 @@
+{ head("Lintian Package Index: $section") }
+  <h1>Package Index: {$section}</h1>
+
+  <p>
+    This is a list of all source or binary packages that have at least one
+    lintian tag.  This includes all tags, even experimental and info tags
+    and tags that were overridden.  The list is huge, so it's broken into
+    four separate pages.  This page covers package names starting with
+    {$section}.
+  </p>
+
+  <p>
+      <a href="packages_1.html">0-9, A-F</a>
+    | <a href="packages_2.html">G-L</a>
+    | <a href="packages_3.html">M-R</a>
+    | <a href="packages_4.html">S-Z</a>
+  </p>
+
+{
+    # Put headings before each new initial letter.
+    my $letter = '';
+    for my $package (@list) {
+        my $first = uc substr($package, 0, 1);
+        if ($first ne $letter) {
+            $OUT .= "  </p>\n\n" if $letter;
+            $OUT .= qq(  <h2>$first</h2>\n\n  <p>\n);
+            $letter = $first;
+        }
+        $OUT .= qq(    <a href="full/$packages{$package}">$package</a>\n);
+    }
+}  </p>
+{ foot() }