r11877 - in /scripts/qa: qareport qareport-chlog.cgi

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

Author: tincho-guest
Date: Mon Dec 31 06:48:26 2007
New Revision: 11877

URL: http://svn.debian.org/wsvn/?sc=1&rev=11877
Log:
Added short description to command line client.
Added a couple of sanity checks to qareport-chlog.cgi.

Modified:
    scripts/qa/qareport
    scripts/qa/qareport-chlog.cgi

Modified: scripts/qa/qareport
URL: http://svn.debian.org/wsvn/scripts/qa/qareport?rev=11877&op=diff
==============================================================================
--- scripts/qa/qareport (original)
+++ scripts/qa/qareport Mon Dec 31 06:48:26 2007
@@ -52,6 +52,7 @@
     if($pkg ne $data{svn_path}) {
         print " (SVN: $data{svn_path})";
     }
+    print " ", $data{svn}{short_descr} if($data{svn}{short_descr});
     print "\n";
     if(%{$data{status}}) {
         print " - Problems: ", join(", ", keys %{$data{status}}), "\n";

Modified: scripts/qa/qareport-chlog.cgi
URL: http://svn.debian.org/wsvn/scripts/qa/qareport-chlog.cgi?rev=11877&op=diff
==============================================================================
--- scripts/qa/qareport-chlog.cgi (original)
+++ scripts/qa/qareport-chlog.cgi Mon Dec 31 06:48:26 2007
@@ -34,8 +34,8 @@
     );
 }
 
-my $pkg = $cgi->param('pkg');
-my $rel = $cgi->param('rel');
+my $pkg = $cgi->param('pkg') or exit 0;
+my $rel = $cgi->param('rel') || '';
 
 my $svn = svn_get();