spawn ($envref, defined $ioref ? $ioref : (), defined $dir ? $dir : (), @_);
}
spawn ($envref, defined $ioref ? $ioref : (), defined $dir ? $dir : (), @_);
}
$repository, $tempwork) == 0
or die "'git clone' exited with nonzero value\n";
git ('config', '--unset', 'core.worktree');
$repository, $tempwork) == 0
or die "'git clone' exited with nonzero value\n";
git ('config', '--unset', 'core.worktree');
my $base = git ( 'merge-base', 'HEAD', $commit);
return ($base ne $fetch_head);
my $base = git ( 'merge-base', 'HEAD', $commit);
return ($base ne $fetch_head);