summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2020-03-10 09:20:52 -0700
committerSean Whitton <spwhitton@spwhitton.name>2020-03-10 09:20:52 -0700
commitbf07e6197761a81a13d1aeb292f7026ef812555b (patch)
treeac73a9ea695b2391222911edad9d0520e3761482 /lib
parent797404ca55365a028b4957d7d04136ebe3e2fd24 (diff)
downloadp5-API-GitForge-bf07e6197761a81a13d1aeb292f7026ef812555b.tar.gz
refer to the fork consistently with $fork_uri
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'lib')
-rw-r--r--lib/API/GitForge/Role/GitForge.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/API/GitForge/Role/GitForge.pm b/lib/API/GitForge/Role/GitForge.pm
index 2f282ae..52760ff 100644
--- a/lib/API/GitForge/Role/GitForge.pm
+++ b/lib/API/GitForge/Role/GitForge.pm
@@ -109,9 +109,8 @@ sub clean_fork {
my $temp = tempdir CLEANUP => 1;
my $git = Git::Wrapper->new($temp);
$git->init;
- $git->remote(qw(add fork), $fork_uri);
my @fork_branches
- = map { m#refs/heads/#; $' } $git->ls_remote(qw(--heads fork));
+ = map { m#refs/heads/#; $' } $git->ls_remote("--heads", $fork_uri);
return $fork_uri if grep /\Agitforge\z/, @fork_branches;
open my $fh, ">", catfile $temp, "README.md";