diff options
Diffstat (limited to 'perl-install/install_interactive.pm')
| -rw-r--r-- | perl-install/install_interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_interactive.pm b/perl-install/install_interactive.pm index 62cd9858c..83b6c0a16 100644 --- a/perl-install/install_interactive.pm +++ b/perl-install/install_interactive.pm @@ -182,7 +182,7 @@ sub setup_thiskind { if ($allow_probe) { @l = $o->load_thiskind($type); - if (my @err = grep { $_->{error} } map { $_->{error} } @l) { + if (my @err = grep { $_ } map { $_->{error} } @l) { $o->ask_warn('', join("\n", @err)); } return @l if $auto && (@l || !$at_least_one); |