summaryrefslogtreecommitdiff
path: root/sync-all
diff options
context:
space:
mode:
authorIan Lynagh <ian@well-typed.com>2012-09-04 14:57:22 +0100
committerIan Lynagh <ian@well-typed.com>2012-09-04 14:57:22 +0100
commit7d847e8222e901bd41919c6363c2cb6597c20d88 (patch)
tree23a5f8b501965221897a8f7c2e1433f121c716ee /sync-all
parent7b11baa68c36fdf5e441c76061fec3a38bc5dbbb (diff)
downloadhaskell-7d847e8222e901bd41919c6363c2cb6597c20d88.tar.gz
Add "remote set-branches" support to sync-all
Diffstat (limited to 'sync-all')
-rwxr-xr-xsync-all7
1 files changed, 6 insertions, 1 deletions
diff --git a/sync-all b/sync-all
index 7c1989277f..70cde64a5d 100755
--- a/sync-all
+++ b/sync-all
@@ -209,7 +209,10 @@ sub scmall {
}
if (@_ < 1) { help(1); }
$subcommand = shift;
- if ($subcommand ne 'add' && $subcommand ne 'rm' && $subcommand ne 'set-url') {
+ if ($subcommand ne 'add' &&
+ $subcommand ne 'rm' &&
+ $subcommand ne 'set-branches' &&
+ $subcommand ne 'set-url') {
help(1);
}
while (@_ > 0 && $_[0] =~ /^-/) {
@@ -398,6 +401,8 @@ sub scmall {
@scm_args = ("remote", "add", $branch_name, $path);
} elsif ($subcommand eq 'rm') {
@scm_args = ("remote", "rm", $branch_name);
+ } elsif ($subcommand eq 'set-branches') {
+ @scm_args = ("remote", "set-branches", $branch_name);
} elsif ($subcommand eq 'set-url') {
@scm_args = ("remote", "set-url", $branch_name, $path);
}