summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-01-21 22:20:35 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-01-21 22:20:35 +0000
commitbb14a5d13f88ced2f926f764f62c603bf22e547c (patch)
tree2e47c4f4cca719a2450bbf414b586fa9efc71ec9
parenteae0589a5d1a157f042fc734aa2189ee7105f385 (diff)
downloaddrakx-backup-do-not-use-bb14a5d13f88ced2f926f764f62c603bf22e547c.tar
drakx-backup-do-not-use-bb14a5d13f88ced2f926f764f62c603bf22e547c.tar.gz
drakx-backup-do-not-use-bb14a5d13f88ced2f926f764f62c603bf22e547c.tar.bz2
drakx-backup-do-not-use-bb14a5d13f88ced2f926f764f62c603bf22e547c.tar.xz
drakx-backup-do-not-use-bb14a5d13f88ced2f926f764f62c603bf22e547c.zip
quiet perl's warning
-rw-r--r--perl-install/any.pm2
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),