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