[pkgsrc/trunk]: pkgsrc/mk/bulk Fix the following error:

[ben <ben%pkgsrc.org@localhost>]

details:   https://anonhg.NetBSD.org/pkgsrc/rev/d66e5e6388a4
branches:  trunk
changeset: 496943:d66e5e6388a4
user:      ben <ben%pkgsrc.org@localhost>
date:      Sun Jul 17 13:38:01 2005 +0000

description:
Fix the following error:

Can't use an undefined value as an ARRAY reference at mk/bulk/post-build line 470.

In the case that no packages were broken, getBroken returns a hash
without the key "topten".  When Perl tries to use that undefined value
as an array reference, it croaks.

diffstat:

 mk/bulk/post-build |  3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diffs (18 lines):

diff -r 2130817dc244 -r d66e5e6388a4 mk/bulk/post-build
--- a/mk/bulk/post-build        Sun Jul 17 12:35:24 2005 +0000
+++ b/mk/bulk/post-build        Sun Jul 17 13:38:01 2005 +0000
@@ -1,5 +1,5 @@
 #!/usr/pkg/bin/perl
-# $NetBSD: post-build,v 1.55 2005/05/19 20:56:36 kristerw Exp $
+# $NetBSD: post-build,v 1.56 2005/07/17 13:38:01 ben Exp $
 #
 # Collect stuff after a pkg bulk build
 #
@@ -541,6 +541,7 @@
                'broken' => [],
                'broken depends' => [],
                'not packaged' => [],
+               'topten' => []
        };
 
        open (BF, $vars{BROKENFILE}) || return $res;