Remove some redundancy in darcs-all
authorIan Lynagh <igloo@earth.li>
Wed, 23 Jul 2008 14:38:04 +0000 (14:38 +0000)
committerIan Lynagh <igloo@earth.li>
Wed, 23 Jul 2008 14:38:04 +0000 (14:38 +0000)
darcs-all

index d25a903..82245fb 100644 (file)
--- a/darcs-all
+++ b/darcs-all
@@ -19,13 +19,9 @@ if ($defaultrepo =~ /^...*:/) {
     $defaultrepo_base =~ s#/[^/]+/?$##;
     $defaultrepo_lib = "$defaultrepo_base/packages";
 }
-elsif ($defaultrepo =~ /^\//) {
-    # Local filesystem, absolute path (assumes a checked-out tree):
-    $defaultrepo_base = $defaultrepo;
-    $defaultrepo_lib = "$defaultrepo/libraries";
-}
-elsif ($defaultrepo =~ /^..\//) {
-    # Local filesystem, relative path (assumes a checked-out tree):
+elsif ($defaultrepo =~ /^(\.\.)?\//) {
+    # Local filesystem, either absolute or relative path
+    # (assumes a checked-out tree):
     $defaultrepo_base = $defaultrepo;
     $defaultrepo_lib = "$defaultrepo/libraries";
 }