diff options
author | Francois Pons <fpons@mandriva.com> | 2000-08-28 16:51:57 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2000-08-28 16:51:57 +0000 |
commit | c047aee8e84b723f6910defab8b0de8063502490 (patch) | |
tree | b12ebc2155d800c65755beee26ab7c8c4cbc9e4d /perl-install/install_interactive.pm | |
parent | a5be3a7fffa550e22e2a56ee40151b69c00afe8a (diff) | |
download | drakx-c047aee8e84b723f6910defab8b0de8063502490.tar drakx-c047aee8e84b723f6910defab8b0de8063502490.tar.gz drakx-c047aee8e84b723f6910defab8b0de8063502490.tar.bz2 drakx-c047aee8e84b723f6910defab8b0de8063502490.tar.xz drakx-c047aee8e84b723f6910defab8b0de8063502490.zip |
*** empty log message ***
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); |