summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/draksec
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-01-16 12:16:50 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-01-16 12:16:50 +0000
commit6bf5ba6748589304e2908255239173b17045e4f2 (patch)
treee90503488881af20ffc8a6c598d2d664fad7246d /perl-install/standalone/draksec
parentb1bdd08ed40de21d9242c0568f640a87f9d2392c (diff)
downloaddrakx-backup-do-not-use-6bf5ba6748589304e2908255239173b17045e4f2.tar
drakx-backup-do-not-use-6bf5ba6748589304e2908255239173b17045e4f2.tar.gz
drakx-backup-do-not-use-6bf5ba6748589304e2908255239173b17045e4f2.tar.bz2
drakx-backup-do-not-use-6bf5ba6748589304e2908255239173b17045e4f2.tar.xz
drakx-backup-do-not-use-6bf5ba6748589304e2908255239173b17045e4f2.zip
"je n'en veux + de cette engeance" (c) pixel :
make explanations provided by log and not anymore by standalone, thus preventing using standalone in drakx (which is bad)
Diffstat (limited to 'perl-install/standalone/draksec')
-rwxr-xr-xperl-install/standalone/draksec14
1 files changed, 7 insertions, 7 deletions
diff --git a/perl-install/standalone/draksec b/perl-install/standalone/draksec
index ed5b2508e..012c26711 100755
--- a/perl-install/standalone/draksec
+++ b/perl-install/standalone/draksec
@@ -208,25 +208,25 @@ my $bok = gtksignal_connect(new Gtk2::Button(N("Ok")),
my $secadmin_value = $secadmin_entry->get_text();
my $w;
- standalone::explanations("Configuring msec");
+ log::explanations("Configuring msec");
if ($seclevel_value ne security::level::get_string()) {
$w = wait_msg(N("Please wait, setting security level..."));
- standalone::explanations("Setting security level");
+ log::explanations("Setting security level");
security::level::set($seclevel_value);
remove_wait_msg($w);
}
$w = wait_msg(N("Please wait, setting security options..."));
- standalone::explanations("Setting security administrator option");
+ log::explanations("Setting security administrator option");
$msec->config_check('MAIL_WARN', $secadmin_check_value == 1 ? 'yes' : 'no');
if ($secadmin_value ne $msec->get_check_value('MAIL_USER') && $secadmin_check_value) {
- standalone::explanations("Setting security administrator contact");
+ log::explanations("Setting security administrator contact");
$msec->config_check('MAIL_USER', $secadmin_value);
}
- standalone::explanations("Setting security periodic checks");
+ log::explanations("Setting security periodic checks");
foreach my $key (keys %security_checks_value) {
if ($security_checks_value{$key}->entry->get_text() ne $msec->get_check_value($key)) {
$msec->config_check($key, $security_checks_value{$key}->entry->get_text());
@@ -234,13 +234,13 @@ my $bok = gtksignal_connect(new Gtk2::Button(N("Ok")),
}
foreach my $domain (keys %options_values) {
- standalone::explanations("Setting msec functions related to $domain");
+ log::explanations("Setting msec functions related to $domain");
foreach my $key (keys %{$options_values{$domain}}) {
my $opt = $options_values{$domain}{$key};
$msec->config_function($key, $opt =~ /Combo/ ? $opt->entry->get_text() : $opt->get_text());
}
}
- standalone::explanations("Applying msec changes");
+ log::explanations("Applying msec changes");
run_program::rooted($::prefix, "/usr/sbin/msec");
remove_wait_msg($w);