diff options
| -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; |