diff --git a/push.pl b/push.pl index 7365c9ee8..860cc41de 100755 --- a/push.pl +++ b/push.pl @@ -118,5 +118,5 @@ while (my $repo = shift) { # '/library/hylang', '/tianon/perl', etc description => $hubShort, full_description => $hubLong, }); - die 'patch to ' . $repoUrl . ' failed' unless $repoPatch->success; + warn 'patch to ' . $repoUrl . ' failed: ' . $repoPatch->res->text and next unless $repoPatch->success; }