X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=darcs-all;fp=darcs-all;h=f936bde63f3af0aaf8eecfa814336e4afdd44fa6;hp=4ad146a4680a378c5f9c7e9a4b14d7f3eaf85b8f;hb=8d1cbbdf6d4e40d116e3c4661ef5a245f23f9511;hpb=8c90ee687f0751a86601415b54b61e120529b1ad

diff --git a/darcs-all b/darcs-all
index 4ad146a..f936bde 100644
--- 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 @_;
     }