Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/272466d88e4311a1afe066755b88fd5cf782b255 >--------------------------------------------------------------- commit 272466d88e4311a1afe066755b88fd5cf782b255 Author: Ian Lynagh <[email protected]> Date: Fri Apr 15 14:21:47 2011 +0100 Tidy sync-all up a bit, and turn on ignorecase for git repos >--------------------------------------------------------------- sync-all | 18 ++++++------------ 1 files changed, 6 insertions(+), 12 deletions(-) diff --git a/sync-all b/sync-all index 2d2a2cd..a7b579e 100755 --- a/sync-all +++ b/sync-all @@ -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. @@ -289,22 +286,19 @@ sub scmall { 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; } _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
