diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-08-12 01:32:32 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-08-12 01:32:32 +0000 |
| commit | 397b67bb86b6cc5109c6583c8efd8bfc06514055 (patch) | |
| tree | f417838af2906a6598f426287ae6542d272ad8b7 /perl-install | |
| parent | 568f788ae12bcc992f65086e0952263c79479765 (diff) | |
| download | drakx-397b67bb86b6cc5109c6583c8efd8bfc06514055.tar drakx-397b67bb86b6cc5109c6583c8efd8bfc06514055.tar.gz drakx-397b67bb86b6cc5109c6583c8efd8bfc06514055.tar.bz2 drakx-397b67bb86b6cc5109c6583c8efd8bfc06514055.tar.xz drakx-397b67bb86b6cc5109c6583c8efd8bfc06514055.zip | |
cleanup
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/security/msec.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/security/msec.pm b/perl-install/security/msec.pm index b96b0cbe2..7b07f1c30 100644 --- a/perl-install/security/msec.pm +++ b/perl-install/security/msec.pm @@ -160,15 +160,14 @@ sub apply_checks { sub reload { my ($msec) = @_; - my $num_level = 0; require security::level; - $num_level ||= security::level::get(); + my $num_level = security::level::get(); $msec->{functions}{defaults_file} = "$::prefix/usr/share/msec/level.$num_level"; $msec->{functions}{default} = { $msec->load_defaults('functions') }; } sub new { - my $type = shift; + my ($type) = @_; my $msec = bless {}, $type; $msec->{functions}{values_file} = "$::prefix/etc/security/msec/level.local"; |