From dfbe3c8fbc677d861122a61f6400c5cbae848149 Mon Sep 17 00:00:00 2001 From: grant Date: Thu, 15 Jul 2004 11:39:11 +0000 Subject: only include broken packages in the email output. --- mk/bulk/post-build | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) (limited to 'mk') diff --git a/mk/bulk/post-build b/mk/bulk/post-build index 32fa5de8a8d..fc4a845d032 100644 --- a/mk/bulk/post-build +++ b/mk/bulk/post-build @@ -1,5 +1,5 @@ #!/usr/pkg/bin/perl -# $NetBSD: post-build,v 1.43 2004/04/09 18:43:14 jschauma Exp $ +# $NetBSD: post-build,v 1.44 2004/07/15 11:39:11 grant Exp $ # # Collect stuff after a pkg bulk build # @@ -203,7 +203,7 @@ sub pkgResult { ''.$nbrokenby.'' if $nbrokenby > 0; - if ($pinfo->{nerrors} != 0 && $verbose) { + if ($pinfo->{nerrors} != 0 && $verbose && $state eq "broken") { print swrite($report_form, $pkg, $nbrokenby > 0 ? $nbrokenby : "", $maintainer); } @@ -416,8 +416,15 @@ EOHTML "not packaged" => "Not packaged" ); + # only include broken packages in the email, see also pkgResult(). + if ($verbose && scalar(@{$broken->{"broken"}})) { + print "\n\n$state_head{broken}\n\n"; + print $report_head; + } + foreach my $state ("broken", "broken depends", "not packaged") { next unless scalar(@{$broken->{$state}}); + print HTML <$state_head{$state} @@ -429,10 +436,6 @@ EOHTML EOHTML - if ($verbose && $state ne "not packaged") { - print "\n\n$state_head{$state}\n\n"; - print $report_head; - } foreach my $pinfo (@{$broken->{$state}}) { print HTML pkgResult($pinfo, $state); } -- cgit v1.2.3