diff --git a/src/commands/fork b/src/commands/fork index fb49d92..fe27035 100755 --- a/src/commands/fork +++ b/src/commands/fork @@ -59,4 +59,4 @@ ln -sf `gitolite query-rc GL_ADMIN_BASE`/hooks/common/* hooks echo "$from" > gl-forked-from # trigger post_create -gitolite trigger POST_CREATE +gitolite trigger POST_CREATE $to $GL_USER diff --git a/src/commands/perms b/src/commands/perms index dce271c..7be3a28 100755 --- a/src/commands/perms +++ b/src/commands/perms @@ -34,8 +34,9 @@ if ( $ARGV[0] eq '-l' ) { getperms(@ARGV); # doesn't return } +my $repo = shift; setperms(@ARGV); -_system( "gitolite", "trigger", "POST_CREATE" ); +_system( "gitolite", "trigger", "POST_CREATE", $repo, $ENV{GL_USER} ); # ---------------------------------------------------------------------- @@ -50,7 +51,6 @@ sub getperms { } sub setperms { - my $repo = shift; _die "sorry you are not authorised" if repo_missing($repo) or creator($repo) ne $ENV{GL_USER}; my $pf = "$rc{GL_REPO_BASE}/$repo.git/gl-perms"; diff --git a/src/triggers/post-compile/update-git-configs b/src/triggers/post-compile/update-git-configs index 446b28a..7f3fb83 100755 --- a/src/triggers/post-compile/update-git-configs +++ b/src/triggers/post-compile/update-git-configs @@ -13,13 +13,30 @@ use Gitolite::Conf::Load; use strict; use warnings; -# ---------------------------------------------------------------------- - my $RB = $rc{GL_REPO_BASE}; _chdir($RB); + +# ---------------------------------------------------------------------- +# if called from POST_CREATE, we have only a single repo to worry about +if (@ARGV and $ARGV[0] eq 'POST_CREATE') { + my $repo = $ARGV[1]; + fixup_config($repo); + + exit 0; +} + +# ---------------------------------------------------------------------- +# else it's all repos (i.e., called from POST_COMPILE) + my $lpr = list_phy_repos(); for my $pr (@$lpr) { + fixup_config($pr); +} + +sub fixup_config { + my $pr = shift; + my $gc = git_config( $pr, '.' ); while ( my ( $key, $value ) = each( %{$gc} ) ) { next if $key =~ /^gitolite-options\./;