diff options
Diffstat (limited to 'perl-install/standalone/draksec')
-rwxr-xr-x | perl-install/standalone/draksec | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/perl-install/standalone/draksec b/perl-install/standalone/draksec deleted file mode 100755 index a14049097..000000000 --- a/perl-install/standalone/draksec +++ /dev/null @@ -1,26 +0,0 @@ -#!/usr/bin/perl - -use lib qw(/usr/lib/libDrakX); - -use standalone; #- warning, standalone must be loaded very first, for 'explanations' - -use common; -use interactive; -use log; -use security::main; - -local $_ = join '', @ARGV; - -/-h/ and die "usage: draksec [--expert]\n"; - -$::expert = /-expert/ || cat_("/etc/sysconfig/system") =~ /^CLASS="?expert/m; #" - -my $in = 'interactive'->vnew('su', 'security'); - -begin: -$::isEmbedded and kill 'USR2', $::CCPID; - -security::main::main($prefix, $in); - -!$::isEmbedded ? $in->exit(0) : kill('USR1', $::CCPID); -goto begin; |