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

[tincho-guest at users.alioth.debian.org]

Author: tincho-guest
Date: Sun Dec  9 08:31:07 2007
New Revision: 11044

URL: http://svn.debian.org/wsvn/?sc=1&rev=11044
Log:
Actually make the forms work

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=11044&op=diff
==============================================================================
--- scripts/qa/qareport.cgi (original)
+++ scripts/qa/qareport.cgi Sun Dec  9 08:31:07 2007
@@ -40,7 +40,10 @@
 my @pkglist = get_pkglist();
 my $cls = classify(@pkglist);
 
-unless($cgi->param("show_all"))
+my( @no_prob, @for_upload, @for_upgrade, @weird, @waiting, @wip, @with_bugs,
+    @all );
+
+if($cgi->param("show_all"))
 {
     foreach(keys %$cls)
     {
@@ -48,13 +51,11 @@
     }
 }
 
-my( @for_upload, @for_upgrade, @weird, @waiting, @wip, @with_bugs, @all );
-
 foreach my $pkg (sort keys %$cls)
 {
     my $data = $cls->{$pkg};
 
-    my $dest;   # like "destiny" :)
+    my $dest = \@no_prob;   # like "destiny" :)
     my %info = (
         name => $pkg,
         map(
@@ -132,6 +133,7 @@
                 all => \@all
             )
             : (
+                all         => \@no_prob,
                 for_upgrade => \@for_upgrade,
                 weird       => \@weird,
                 for_upload  => \@for_upload,

Modified: scripts/qa/templates/by_category
URL: http://svn.debian.org/wsvn/scripts/qa/templates/by_category?rev=11044&op=diff
==============================================================================
--- scripts/qa/templates/by_category (original)
+++ scripts/qa/templates/by_category Sun Dec  9 08:31:07 2007
@@ -200,6 +200,16 @@
             vertical-align: top;
             text-align: left;
         }
+        #options {
+            float: left;
+            padding: .5em;
+            border: 1px black dashed;
+            margin-bottom: 1em;
+        }
+        #options div { display: none }
+        #w3org {
+            clear: both;
+        }
     </style>
     <script type="text/javascript">
         function toggle_visibility(id)
@@ -266,12 +276,28 @@
 
 <div id="options">
 [% USE CGI %]
-[% CGI.start_form %]
-[% CGI.checkbox({ Name => 'show_all', Label => "Show all packages" }) %]
-[% CGI.submit %]
-[% CGI.end_form.join("") %]
+[% CGI.start_form({ Method => 'GET' }) %]
+[% CGI.p(CGI.checkbox({ Name => 'show_all', Label => "Show all packages" })) %]
+[% CGI.p("Format:", CGI.radio_group({
+    Name => 'format',
+    Values => [ 'list', 'categories' ],
+    Default => 'list',
+}).join("\n")) %]
+[% CGI.p("Refresh:", CGI.radio_group({
+    Name => 'refresh',
+    Values => [ 0, 1800, 3600, 7200 ],
+    Default => 0,
+    Labels => {
+        "0" => "No refresh",
+        "1800" => "30 min",
+        "3600" => "1 hour",
+        "7200" => "2 hours"
+    }
+}).join("\n")) %]
+[% CGI.submit({ Label => 'Reload' }) %]
+[% CGI.end_form.join("\n") %]
 </div>
-<p>
+<p id="w3org">
     <a href="http://validator.w3.org/check?uri=referer"><img
         style="border:0;width:88px;height:31px"
         src="http://www.w3.org/Icons/valid-xhtml10-blue"