r9046 - in /scripts/qa: qareport.cgi templates/by_category

[dmn at users.alioth.debian.org]

Author: dmn
Date: Thu Nov  8 15:03:39 2007
New Revision: 9046

URL: http://svn.debian.org/wsvn/?sc=1&rev=9046
Log:
Implement a plain list approach. Does not use colors yet. Try it with ?format=list

Modified:
    scripts/qa/qareport.cgi
    scripts/qa/templates/by_category

Modified: scripts/qa/qareport.cgi
URL: http://svn.debian.org/wsvn/scripts/qa/qareport.cgi?rev=9046&op=diff
==============================================================================
--- scripts/qa/qareport.cgi (original)
+++ scripts/qa/qareport.cgi Thu Nov  8 15:03:39 2007
@@ -90,6 +90,12 @@
     push @waiting, $pkg if($archsuit =~ /new|incoming/);
 }
 
+my %all = map(
+    ( $_ => 1 ),
+    @wip, @for_upload, @weird, @for_upgrade, @with_bugs, @waiting,
+);
+my @all = sort keys %all;
+
 if( $ENV{GATEWAY_INTERFACE} )
 {
     my $htmlp = $cgi->Accept("text/html");
@@ -139,12 +145,20 @@
         group_name  => $CFG{qareport_cgi}{group_name},
         group_url   => $CFG{qareport_cgi}{group_url},
         wsvn_url    => $CFG{qareport_cgi}{wsvn_url},
-        for_upgrade => \@for_upgrade,
-        weird       => \@weird,
-        for_upload  => \@for_upload,
-        waiting     => \@waiting,
-        wip         => \@wip,
-        with_bugs   => \@with_bugs,
+        (
+            ( ($cgi->param('format')||'') eq 'list' )
+            ? (
+                all => \@all
+            )
+            : (
+                for_upgrade => \@for_upgrade,
+                weird       => \@weird,
+                for_upload  => \@for_upload,
+                waiting     => \@waiting,
+                wip         => \@wip,
+                with_bugs   => \@with_bugs,
+            )
+        ),
     },
 ) || die $tt->error;
 

Modified: scripts/qa/templates/by_category
URL: http://svn.debian.org/wsvn/scripts/qa/templates/by_category?rev=9046&op=diff
==============================================================================
--- scripts/qa/templates/by_category (original)
+++ scripts/qa/templates/by_category Thu Nov  8 15:03:39 2007
@@ -69,13 +69,15 @@
 [% END #BLOCK package %]
 
 [% BLOCK section %]
-    [% IF list.size %]
+    [% IF list.0 %]
+    [% IF title and name %]
     <tbody>
         <tr>
             <th colspan="5" class="clickable"><a style="display: block" href="javascript:toggle_visibility('$name')">$title ($list.size)</a></th>
         </tr>
     </tbody>
-    <tbody id="$name">
+    [% END #IF title and name %]
+    <tbody[% IF name %] id="$name"[% END %]>
         <tr>
             <th>Package</th>
             <th>Repository</th>
@@ -192,6 +194,7 @@
     [% INCLUDE section data=data list=weird name="weird" title="Packages with strange versions in the repository" %]
     [% INCLUDE section data=data list=wip name="wip" title="Work in progress" %]
     [% INCLUDE section data=data list=with_bugs name="with_bugs" title="With bugs" %]
+    [% INCLUDE section data=data list=all name='' title='' %]
 </table>
 <p>
     <a href="http://validator.w3.org/check?uri=referer"><img