Fix "darcs get"

[ghc-hetmet.git] / darcs-all

diff --git a/darcs-all b/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 "upstreampull") {
+    elsif ($command eq "upstreampull") {
         shift;
         darcsupstreampull @_;
     }