r9412 - /scripts/qa/qareport.cgi

dmn at users.alioth.debian.org dmn at users.alioth.debian.org
Fri Nov 16 14:42:06 UTC 2007


Author: dmn
Date: Fri Nov 16 14:42:06 2007
New Revision: 9412

URL: http://svn.debian.org/wsvn/?sc=1&rev=9412
Log:
Move the upgrade-needed check before upload-needed check

Modified:
    scripts/qa/qareport.cgi

Modified: scripts/qa/qareport.cgi
URL: http://svn.debian.org/wsvn/scripts/qa/qareport.cgi?rev=9412&op=diff
==============================================================================
--- scripts/qa/qareport.cgi (original)
+++ scripts/qa/qareport.cgi Fri Nov 16 14:42:06 2007
@@ -87,6 +87,12 @@
         $dest ||= \@weird;
         $todo{repo} = 1;
     }
+    # Use only mangled versions
+    if(deb_compare($m_dver, $u_uver) < 0) {
+        push @notes, "$m_dver needs upgrading to newer upstream";
+        $dest ||= \@for_upgrade;
+        $todo{repo} = 1;
+    }
     if(deb_compare($archver, $dver) != 0) {
         push @notes, "Needs uploading to the archive";
         $dest ||= \@for_upload;
@@ -104,12 +110,6 @@
         push @notes, "Ancient version in upstream?";
         $dest ||= \@weird;
         $todo{upstream} = 1;
-    }
-    # Use only mangled versions
-    if(deb_compare($m_dver, $u_uver) < 0) {
-        push @notes, "$m_dver needs upgrading to newer upstream";
-        $dest ||= \@for_upgrade;
-        $todo{repo} = 1;
     }
     $dest ||= \@with_bugs if(@bugs);
 




More information about the Pkg-perl-cvs-commits mailing list