Display reasons for failures when program finishes.
authorRichard W.M. Jones <rjones@redhat.com>
Mon, 11 Jun 2012 10:37:56 +0000 (11:37 +0100)
committerRichard W.M. Jones <rjones@redhat.com>
Mon, 11 Jun 2012 10:37:56 +0000 (11:37 +0100)
mass-rebuild.pl

index a3e628d..59ca070 100755 (executable)
@@ -303,6 +303,13 @@ foreach $pkg (@build_order) {
     $package_notes{$pkg}{build_done} = 1;
 }
 
+# Finish off by printing the package notes for builds that failed.
+foreach $pkg (@build_order) {
+    if (exists $package_notes{$pkg}{error}) {
+        print "$pkg failed, reason: ", $package_notes{$pkg}{error}, "\n";
+    }
+}
+
 sub do_build_and_wait
 {
     my $pkg = shift;