summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-11-20 08:46:44 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-11-20 08:46:44 +0000
commit97d2144c0844a682ae8d22cb9fb19d71a9648614 (patch)
treed898e893a7ee786fe4e7b495c53824a757efbb86 /perl-install
parent9ff7af06907da2605f137d16d7197a7ebe121051 (diff)
downloaddrakx-backup-do-not-use-97d2144c0844a682ae8d22cb9fb19d71a9648614.tar
drakx-backup-do-not-use-97d2144c0844a682ae8d22cb9fb19d71a9648614.tar.gz
drakx-backup-do-not-use-97d2144c0844a682ae8d22cb9fb19d71a9648614.tar.bz2
drakx-backup-do-not-use-97d2144c0844a682ae8d22cb9fb19d71a9648614.tar.xz
drakx-backup-do-not-use-97d2144c0844a682ae8d22cb9fb19d71a9648614.zip
cleanups
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/security/msec.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/security/msec.pm b/perl-install/security/msec.pm
index 1ede6a4b1..bd3cb81eff 100644
--- a/perl-install/security/msec.pm
+++ b/perl-install/security/msec.pm
@@ -167,7 +167,7 @@ sub get_functions {
set_shell_history_size set_shell_timeout set_user_umask)]);
my $file = "$::prefix/usr/share/msec/mseclib.py";
- my $function = '';
+ my $function;
# read mseclib.py to get each function's name and if it's
# not in the ignore list, add it to the returned list.
@@ -255,8 +255,7 @@ sub get_check_default {
# config_check(check, value)
# Apply the configuration to "$::prefix"/etc/security/msec/security.conf
sub config_check {
- shift;
- my ($check, $value) = @_;
+ my (undef, $check, $value) = @_;
if ($value eq 'default') {
substInFile { s/^$check.*\n// } $check_file;
} else {