Fix "darcs get"
authorIan Lynagh <igloo@earth.li>
Sun, 22 Aug 2010 18:35:42 +0000 (18:35 +0000)
committerIan Lynagh <igloo@earth.li>
Sun, 22 Aug 2010 18:35:42 +0000 (18:35 +0000)
darcs-all

index 4ad146a..f936bde 100644 (file)
--- a/darcs-all
+++ b/darcs-all
@@ -341,7 +341,7 @@ sub main {
     if ($command eq "get") {
         darcsget @_;
     }
     if ($command eq "get") {
         darcsget @_;
     }
-    if ($command eq "upstreampull") {
+    elsif ($command eq "upstreampull") {
         shift;
         darcsupstreampull @_;
     }
         shift;
         darcsupstreampull @_;
     }