diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 1999-12-19 01:45:46 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 1999-12-19 01:45:46 +0000 |
| commit | ef3ce36c2a0e4f385c65ca6223ba4c5c4e86e122 (patch) | |
| tree | a2c4f3f4d6f5bd558c64aa4fcf768fecf755b939 /perl-install/standalone/draksec | |
| parent | ffbb1c226e9a3a8932646947a2e191089a195fc0 (diff) | |
| download | drakx-backup-do-not-use-ef3ce36c2a0e4f385c65ca6223ba4c5c4e86e122.tar drakx-backup-do-not-use-ef3ce36c2a0e4f385c65ca6223ba4c5c4e86e122.tar.gz drakx-backup-do-not-use-ef3ce36c2a0e4f385c65ca6223ba4c5c4e86e122.tar.bz2 drakx-backup-do-not-use-ef3ce36c2a0e4f385c65ca6223ba4c5c4e86e122.tar.xz drakx-backup-do-not-use-ef3ce36c2a0e4f385c65ca6223ba4c5c4e86e122.zip | |
no_comment
Diffstat (limited to 'perl-install/standalone/draksec')
| -rwxr-xr-x | perl-install/standalone/draksec | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/standalone/draksec b/perl-install/standalone/draksec index 5fc4cce86..04d332541 100755 --- a/perl-install/standalone/draksec +++ b/perl-install/standalone/draksec @@ -11,7 +11,7 @@ local $_ = join '', @ARGV; /-h/ and die "usage: draksec [--expert]\n"; -$::expert = /--expert/ || cat_("/etc/sysconfig/system") =~ /^TYPE="?expert/m; #" +$::expert = /-expert/ || cat_("/etc/sysconfig/system") =~ /^TYPE="?expert/m; #" $::isStandalone = 1; my $in = vnew interactive('su'); @@ -28,7 +28,9 @@ delete @l{0,1,5} unless $::expert; if (my $level = $in->ask_from_list('', _("Choose security level"), [ values %l ], $l{$ENV{SECURE_LEVEL}})) { my $w = $in->wait_message('', _("Setting security level")); + $in->suspend; system("/etc/security/msec/init.sh ". $m{$level}); + $in->resume; } $in->exit(0); |