diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/API/GitForge/Role/GitForge.pm | 10 | ||||
-rw-r--r-- | lib/App/git/nuke_forge_fork.pm | 2 |
2 files changed, 10 insertions, 2 deletions
diff --git a/lib/API/GitForge/Role/GitForge.pm b/lib/API/GitForge/Role/GitForge.pm index 52760ff..953eb91 100644 --- a/lib/API/GitForge/Role/GitForge.pm +++ b/lib/API/GitForge/Role/GitForge.pm @@ -119,7 +119,15 @@ sub clean_fork { $git->add("README.md"); $git->commit({ message => "Temporary fork for pull request(s)" }); - $git->push($fork_uri, "master:gitforge"); + # We should be able to just say + # + # $git->push($fork_uri, "master:gitforge"); + # + # but that hangs indefinitely when pushing to (at least) Debian's + # GitLab instance. So just bypass Git::Wrapper and do the push + # ourselves for now + system qw(git -C), $git->dir, "push", $fork_uri, "master:gitforge"; + $self->_clean_config_fork($_[0]); # assume that if we had to create the gitforge branch, we just diff --git a/lib/App/git/nuke_forge_fork.pm b/lib/App/git/nuke_forge_fork.pm index 773d863..8505da9 100644 --- a/lib/App/git/nuke_forge_fork.pm +++ b/lib/App/git/nuke_forge_fork.pm @@ -69,7 +69,7 @@ sub main { exit unless $term->ask_yn(prompt => "Are you sure?"); } - my ($forge_domain, $upstream_repo) = remote_forge_info $upstream ; + my ($forge_domain, $upstream_repo) = remote_forge_info $upstream; my $forge = new_from_domain domain => $forge_domain, access_token => forge_access_token $forge_domain; |