diff options
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index be1ff5e28..3c6d8d624 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -490,7 +490,7 @@ sub setup_thiskind { my ($in, $type, $auto, $at_least_one) = @_; return if arch() eq "ppc"; - my @l=setup_thiskind_backend ($type, $auto, $at_least_one, sub { my $w = wait_load_module($in, $type, @_) } ); + my @l = setup_thiskind_backend ($type, $auto, $at_least_one, sub { my $w = wait_load_module($in, $type, @_) } ); if (!$::noauto) { if (my @err = grep { $_ } map { $_->{error} } @l) { @@ -533,7 +533,7 @@ sub setup_thiskind_backend { my @l; if (!$::noauto) { @l = modules::load_thiskind($type, $wait_function ); - return @l if $auto && (@l || !$at_least_one); + return @l;# DAMS SUCKERY if $auto && (@l || !$at_least_one); } } |