diff options
author | Ian Lynagh <igloo@earth.li> | 2011-04-15 14:21:47 +0100 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2011-04-15 14:21:47 +0100 |
commit | 272466d88e4311a1afe066755b88fd5cf782b255 (patch) | |
tree | 9ea2025b6ca4cfa856ee71e3338501c2290397a3 /sync-all | |
parent | 0859155da9069718866694aadef1e858445e01c8 (diff) | |
download | haskell-272466d88e4311a1afe066755b88fd5cf782b255.tar.gz |
Tidy sync-all up a bit, and turn on ignorecase for git repos
Diffstat (limited to 'sync-all')
-rwxr-xr-x | sync-all | 20 |
1 files changed, 7 insertions, 13 deletions
@@ -68,9 +68,6 @@ my $ignore_failure = 0; my $checked_out_flag = 0; my $get_mode; -# Flags specific to a particular command -my $local_repo_unnecessary = 0; - my %tags; # Figure out where to get the other repositories from. @@ -288,23 +285,20 @@ sub scmall { if $localpath ne "."; next; } - - # The first time round the loop, default the get-mode - if ($scm eq "darcs" && not defined($get_mode)) { - warning("adding --partial, to override use --complete"); - $get_mode = "--partial"; - } - - # The only command that doesn't need a repo - $local_repo_unnecessary = 1; - + # Note that we use "." as the path, as $localpath # doesn't exist yet. if ($scm eq "darcs") { + # The first time round the loop, default the get-mode + if (not defined($get_mode)) { + warning("adding --partial, to override use --complete"); + $get_mode = "--partial"; + } scm (".", $scm, "get", $get_mode, $path, $localpath, @args); } else { scm (".", $scm, "clone", $path, $localpath, @args); + scm ($localpath, $scm, "config", "core.ignorecase", "true"); } next; } |