diff options
| -rw-r--r-- | perl-install/install/steps_interactive.pm | 2 | ||||
| -rw-r--r-- | perl-install/security/level.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm index 1831f4421..18e204f2f 100644 --- a/perl-install/install/steps_interactive.pm +++ b/perl-install/install/steps_interactive.pm @@ -980,7 +980,7 @@ sub summary { require security::level; my $security = $o->{security}; set_sec_level: - if (security::level::level_choose($o, \$security, \$o->{libsafe}, \$o->{security_user})) { + if (security::level::level_choose($o, \$security, \$o->{security_user})) { check_security_level($o, $security) or goto set_sec_level; $o->{security} = $security; install::any::set_security($o); diff --git a/perl-install/security/level.pm b/perl-install/security/level.pm index a411d66bf..0db951929 100644 --- a/perl-install/security/level.pm +++ b/perl-install/security/level.pm @@ -35,7 +35,7 @@ sub set { } sub level_choose { - my ($in, $security, $libsafe, $email) = @_; + my ($in, $security, $email) = @_; my %help = ( 0 => N("This level is to be used with care. It makes your system more easy to use, |