Fix sync-all: Check for --complete/partial before --<anything>
authorIan Lynagh <igloo@earth.li>
Sun, 4 Jan 2009 18:46:52 +0000 (18:46 +0000)
committerIan Lynagh <igloo@earth.li>
Sun, 4 Jan 2009 18:46:52 +0000 (18:46 +0000)
Patch from megacz in trac #2857

sync-all

index 1f0bfec..1de4fe3 100644 (file)
--- a/sync-all
+++ b/sync-all
@@ -199,15 +199,15 @@ sub main {
         elsif ($arg eq "--ignore-failure") {
             $ignore_failure = 1;
         }
+        elsif ($arg eq "--complete" || $arg eq "--partial") {
+            $get_mode = $arg;
+        }
         # --<tag> says we grab the libs tagged 'tag' with
         # 'get'. It has no effect on the other commands.
         elsif ($arg =~ m/^--/) {
             $arg =~ s/^--//;
             $tags{$arg} = 1;
         }
-        elsif ($arg eq "--complete" || $arg eq "--partial") {
-            $get_mode = $arg;
-        }
         else {
             unshift @_, $arg;
             if (grep /^-q$/, @_) {