fixup CWD in access(); see below
Calling access() changes the CWD to $GL_REPO_BASE! This causes a problem in the update script -- you're suddenly in the wrong directory after calling access()! This is actually happening inside load_1(), so fix that.
This commit is contained in:
parent
877f6eb31b
commit
56cda99edd
|
@ -117,7 +117,7 @@ sub load_1 {
|
||||||
my $repo = shift;
|
my $repo = shift;
|
||||||
trace( 4, $repo );
|
trace( 4, $repo );
|
||||||
|
|
||||||
_chdir( $rc{GL_REPO_BASE} );
|
_chdir( "$rc{GL_REPO_BASE}/$repo.git" );
|
||||||
|
|
||||||
if ( $repo eq $last_repo ) {
|
if ( $repo eq $last_repo ) {
|
||||||
$repos{$repo} = $one_repo{$repo};
|
$repos{$repo} = $one_repo{$repo};
|
||||||
|
@ -125,10 +125,10 @@ sub load_1 {
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
if ( -f "$repo.git/gl-conf" ) {
|
if ( -f "gl-conf" ) {
|
||||||
_die "split conf not set, gl-conf present for $repo" if not $split_conf{$repo};
|
_die "split conf not set, gl-conf present for $repo" if not $split_conf{$repo};
|
||||||
|
|
||||||
my $cc = "$repo.git/gl-conf";
|
my $cc = "gl-conf";
|
||||||
_die "parse $cc failed: " . ( $! or $@ ) unless do $cc;
|
_die "parse $cc failed: " . ( $! or $@ ) unless do $cc;
|
||||||
|
|
||||||
$last_repo = $repo;
|
$last_repo = $repo;
|
||||||
|
|
Loading…
Reference in a new issue