diff options
author | Francois Pons <fpons@mandriva.com> | 2001-04-12 13:49:42 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2001-04-12 13:49:42 +0000 |
commit | 1feaa0f7aed3f0823e5a69c626737b03b645b7cc (patch) | |
tree | 3c0cac10f773621716381b0f5d0078178b617750 /perl-install/interactive.pm | |
parent | e4a733279204fd41aaee08d77501c38a01b8932f (diff) | |
download | drakx-backup-do-not-use-1feaa0f7aed3f0823e5a69c626737b03b645b7cc.tar drakx-backup-do-not-use-1feaa0f7aed3f0823e5a69c626737b03b645b7cc.tar.gz drakx-backup-do-not-use-1feaa0f7aed3f0823e5a69c626737b03b645b7cc.tar.bz2 drakx-backup-do-not-use-1feaa0f7aed3f0823e5a69c626737b03b645b7cc.tar.xz drakx-backup-do-not-use-1feaa0f7aed3f0823e5a69c626737b03b645b7cc.zip |
removed strict die on empty list.
Diffstat (limited to 'perl-install/interactive.pm')
-rw-r--r-- | perl-install/interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm index 567c2cef8..187fbc82e 100644 --- a/perl-install/interactive.pm +++ b/perl-install/interactive.pm @@ -248,7 +248,7 @@ sub ask_from_entries_refH_powered_normalize { #- don't display empty lists and one element lists @$l = grep { my $b = $_->{list} && $_->{not_edit}; - @{$_->{list}} == () and die 'ask_from_list: empty list'; + #@{$_->{list}} == () and die 'ask_from_list: empty list'; !($b && @{$_->{list}} <= 1); } @$l; |