diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-01-21 22:20:35 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-01-21 22:20:35 +0000 |
commit | bb14a5d13f88ced2f926f764f62c603bf22e547c (patch) | |
tree | 2e47c4f4cca719a2450bbf414b586fa9efc71ec9 /perl-install | |
parent | eae0589a5d1a157f042fc734aa2189ee7105f385 (diff) | |
download | drakx-bb14a5d13f88ced2f926f764f62c603bf22e547c.tar drakx-bb14a5d13f88ced2f926f764f62c603bf22e547c.tar.gz drakx-bb14a5d13f88ced2f926f764f62c603bf22e547c.tar.bz2 drakx-bb14a5d13f88ced2f926f764f62c603bf22e547c.tar.xz drakx-bb14a5d13f88ced2f926f764f62c603bf22e547c.zip |
quiet perl's warning
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/any.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 775aa8938..3576c6ce8 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -979,7 +979,7 @@ connections from many clients. "), Security features are at their maximum."), ); delete @l{0,1}; - delete @l{5} if !$::expert; + delete $l{5} if !$::expert; $in->ask_from('', _("Choose security level") . "\n\n" . join('', map { "$l{$_}: $help{$_}\n\n" } keys %l), |