]> Sergey Matveev's repositories - public-inbox.git/blobdiff - lib/PublicInbox/SolverGit.pm
git: use "git rev-parse --git-path"
[public-inbox.git] / lib / PublicInbox / SolverGit.pm
index d7875333af9cec3dcc4f5df20aeda4e185a3a316..59d2c93ca4274af1b831e9b15a1a86e9cb8bd538 100644 (file)
@@ -272,8 +272,9 @@ EOF
 
        my $f = 'objects/info/alternates';
        open $fh, '>', "$git_dir/$f" or die "open: $f: $!";
-       print($fh (map { "$_->{git_dir}/objects\n" } @{$self->{gits}})) or
-               die "print $f: $!";
+       foreach my $git (@{$self->{gits}}) {
+               print $fh $git->git_path('objects'),"\n" or die "print $f: $!";
+       }
        close $fh or die "close: $f: $!";
        my $tmp_git = $self->{tmp_git} = PublicInbox::Git->new($git_dir);
        $tmp_git->{-tmp} = $self->{tmp};