r8958 - /scripts/qa/qareport.cgi

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

Author: tincho-guest
Date: Wed Nov  7 13:51:47 2007
New Revision: 8958

URL: http://svn.debian.org/wsvn/?sc=1&rev=8958
Log:
- Don't treat native packages as a problem
- When there's no upstream version, show watch file error

Modified:
    scripts/qa/qareport.cgi

Modified: scripts/qa/qareport.cgi
URL: http://svn.debian.org/wsvn/scripts/qa/qareport.cgi?rev=8958&op=diff
==============================================================================
--- scripts/qa/qareport.cgi (original)
+++ scripts/qa/qareport.cgi Wed Nov  7 13:51:47 2007
@@ -75,6 +75,8 @@
         push @for_upgrade, $pkg;
     } elsif(deb_compare($archver, $dver) != 0) {
         push @for_upload, $pkg;
+    } elsif($werr and $werr eq "Native") {
+        $note = "Native package";
     } elsif($dwerr or not $m_dver or not $m_uver or not $uver) {
         $note = "Watchfile problem";
         push @wip, $pkg;
@@ -170,7 +172,7 @@
         <td>$pkg</td>
         <td><a href="http://svn.debian.org/wsvn/pkg-perl/trunk/$pkg/debian/changelog?op=file&amp;rev=0&amp;sc=0">$svn_ver[% IF svn_un_ver AND (svn_un_ver != svn_ver) %]<span style="font-size: smaller"> ($svn_un_ver)</span>[% END #IF %]</a></td>
         <td>[% INCLUDE bts_link data=data pkg=pkg %][% IF arch_ver %]<a href="http://packages.qa.debian.org/$pkg">$arch_ver</a>[% END #IF %]</td>
-        <td>${data.watch.$pkg.upstream_mangled}</td>
+        <td>${data.watch.$pkg.upstream_mangled || data.watch.$pkg.error}</td>
     </tr>
 [% END #BLOCK package %]