Browse Source

Handle failure in push.pl slightly better

Tianon Gravi 10 năm trước cách đây
mục cha
commit
39b21e67ba
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  1. 1 1
      push.pl

+ 1 - 1
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;
 }