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.
This commit is contained in:
parent
e1555dc02e
commit
af63d72ec7
1 changed files with 2 additions and 1 deletions
|
@ -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 @@ sub getBroken {
|
|||
'broken' => [],
|
||||
'broken depends' => [],
|
||||
'not packaged' => [],
|
||||
'topten' => []
|
||||
};
|
||||
|
||||
open (BF, $vars{BROKENFILE}) || return $res;
|
||||
|
|
Loading…
Reference in a new issue