X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=darcs-all;h=d25a9033556c6626bfc5625e6aa821ffd7a3d5b4;hb=4a6f2bc7c3da7e74192339502704877bfc12ccc1;hp=046e589f5d9e54b5861735ff9bc5e81848ff78d3;hpb=ad5299d90d21898470f1d9dd5742d40fa1a8ebc0;p=ghc-hetmet.git diff --git a/darcs-all b/darcs-all index 046e589..d25a903 100644 --- a/darcs-all +++ b/darcs-all @@ -11,8 +11,10 @@ chomp $defaultrepo; my $defaultrepo_base; my $defaultrepo_lib; -if ($defaultrepo =~ /:/) { +if ($defaultrepo =~ /^...*:/) { # HTTP or SSH + # Above regex says "at least two chars before the :", to avoid + # catching Win32 drives ("C:\"). $defaultrepo_base = $defaultrepo; $defaultrepo_base =~ s#/[^/]+/?$##; $defaultrepo_lib = "$defaultrepo_base/packages"; @@ -76,11 +78,7 @@ sub darcsall { chomp $path; if ($path =~ m#/(.*)/#) { my $pkg = $1; - # bootstrapping.* are just copies of other repos; we don't - # update them directly. - if ($pkg !~ /bootstrapping/) { - darcs (@_, "--repodir", "libraries/$pkg"); - } + darcs (@_, "--repodir", "libraries/$pkg"); } else { die "that pattern can't fail!";