From 2d3b13d3b7e6f08f6310467ece7d399c5858d233 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 28 Aug 1999 10:19:54 +0000 Subject: no_comment --- perl-install/install_steps.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 8dac8db20..a7720e692 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -51,7 +51,7 @@ sub enteringStep($$) { my $reachable = 1; if (my $needs = $o->{steps}{$s}{needs}) { my @l = ref $needs ? @$needs : $needs; - $reachable = min(map { $o->{steps}{$_}{done} } @l); + $reachable = min(map { $o->{steps}{$_}{done} || 0 } @l); } if ($reachable && !$o->{steps}{$s}{reachable}) { $o->{steps}{$s}{reachable} = 1; -- cgit v1.2.1