deac/gitolite
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

gl-conf must be created even if the repo para has only config lines

Browse source 
(i.e., no access rules but only config lines)
This commit is contained in:
gitolite tester 2012-11-13 06:51:14 +05:30
parent c03d107bac
commit 16f2d9b879
1 changed files with 7 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
src/lib/Gitolite/Conf/Store.pm
View file

@ -258,15 +258,18 @@ sub store_1 {
# warning: writes and *deletes* it from %repos and %configs # warning: writes and *deletes* it from %repos and %configs
my ($repo) = shift; my ($repo) = shift;
trace( 3, $repo ); trace( 3, $repo );
return unless $repos{$repo} and -d "$repo.git"; return unless ( $repos{$repo} or $configs{$repo} ) and -d "$repo.git";
my ( %one_repo, %one_config ); my ( %one_repo, %one_config );
open( my $compiled_fh, ">", "$repo.git/gl-conf" ) or return; open( my $compiled_fh, ">", "$repo.git/gl-conf" ) or return;
$one_repo{$repo} = $repos{$repo}; my $dumped_data = '';
delete $repos{$repo}; if ($repos{$repo}) {
my $dumped_data = Data::Dumper->Dump( [ \%one_repo ], [qw(*one_repo)] ); $one_repo{$repo} = $repos{$repo};
delete $repos{$repo};
$dumped_data = Data::Dumper->Dump( [ \%one_repo ], [qw(*one_repo)] );
}
if ( $configs{$repo} ) { if ( $configs{$repo} ) {
$one_config{$repo} = $configs{$repo}; $one_config{$repo} = $configs{$repo};