r15241 - /scripts/qa/qareport.cgi

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

Author: tincho-guest
Date: Wed Feb 20 21:15:53 2008
New Revision: 15241

URL: http://svn.debian.org/wsvn/?sc=1&rev=15241
Log:
never_uploaded is not ready for upload, it's just not in the archive. Also, upgrade for_upgade (newer upstream) priority.

Modified:
    scripts/qa/qareport.cgi

Modified: scripts/qa/qareport.cgi
URL: http://svn.debian.org/wsvn/scripts/qa/qareport.cgi?rev=15241&op=diff
==============================================================================
--- scripts/qa/qareport.cgi (original)
+++ scripts/qa/qareport.cgi Wed Feb 20 21:15:53 2008
@@ -61,14 +61,13 @@
     my $dest;   # like "destiny" :)
     my $status = $data->{status};   # to save some typing
 
+    $dest ||= \@for_upgrade if($status->{needs_upgrade});
     $dest ||= \@wip if($status->{name_mismatch});
-    $dest ||= \@for_upgrade if($status->{needs_upgrade});
-    $dest ||= \@wip if($status->{not_finished} or
-        $status->{invalid_svn_version} or $status->{invalid_tag}
-            or $status->{missing_tag});
+    $dest ||= \@wip if($status->{not_finished}
+            or $status->{invalid_svn_version} or $status->{invalid_tag}
+            or $status->{missing_tag} or $status->{never_uploaded});
     $dest ||= \@tagged if($status->{tagged_wait});
-    $dest ||= \@for_upload if($status->{needs_upload} or
-        $status->{never_uploaded});
+    $dest ||= \@for_upload if($status->{needs_upload});
     $dest ||= \@weird if($status->{repo_ancient} or $status->{svn_ancient} or
         $status->{upstream_ancient});
     $dest ||= \@wip if $status->{watch_error};