summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/draksec
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-02-04 07:33:03 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-02-04 07:33:03 +0000
commit5848d7d28d142c5856103554c142c3dd6754f5c7 (patch)
tree210ecf4b80007862f122a964de29cd3d0d0057cf /perl-install/standalone/draksec
parent971d41aa5957212c27c28200703e8d5e54b45a4e (diff)
downloaddrakx-backup-do-not-use-5848d7d28d142c5856103554c142c3dd6754f5c7.tar
drakx-backup-do-not-use-5848d7d28d142c5856103554c142c3dd6754f5c7.tar.gz
drakx-backup-do-not-use-5848d7d28d142c5856103554c142c3dd6754f5c7.tar.bz2
drakx-backup-do-not-use-5848d7d28d142c5856103554c142c3dd6754f5c7.tar.xz
drakx-backup-do-not-use-5848d7d28d142c5856103554c142c3dd6754f5c7.zip
now, we always have a help entry and a default value but when fredl rename a
check and forgot to remove it from /var/lib/msec/security.conf like CHECK_SUID_GROUP => CHECK_SGID, but hopefully, he'll fix msec
Diffstat (limited to 'perl-install/standalone/draksec')
-rwxr-xr-xperl-install/standalone/draksec8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/standalone/draksec b/perl-install/standalone/draksec
index d9732ea0e..234284513 100755
--- a/perl-install/standalone/draksec
+++ b/perl-install/standalone/draksec
@@ -98,10 +98,10 @@ sub new_editable_combo {
$w;
}
-sub set_default_tip {
+sub set_help_tip {
my ($entry, $default, $opt) = @_;
my $help = $security::help::help{$opt};
- gtkset_tip(new Gtk2::Tooltips, $entry, join("\n", if_($help, formatAlaTeX($help)), if_($default, N("(default value: %s)", $default))));
+ gtkset_tip(new Gtk2::Tooltips, $entry, formatAlaTeX($help) . "\n" . N("(default value: %s)", $default));
}
my $msec = new security::msec;
@@ -176,7 +176,7 @@ foreach ([ 'network', N("Network Options") ], [ 'system', N("System Options") ])
$entry = $values{$i};
}
$entry->set_text($msec->get_function_value($i));
- set_default_tip($entry, $default, $i);
+ set_help_tip($entry, $default, $i);
[ new Gtk2::Label($i), $values{$i} ];
} sort $msec->get_functions($domain))))),
new Gtk2::Label($label));
@@ -194,7 +194,7 @@ $notebook->append_page(gtkshow(create_scrolled_window(gtkpack_(new Gtk2::VBox(0,
my $i = $_;
$security_checks_value{$i} = new_editable_combo();
my $entry = $security_checks_value{$i}->entry;
- set_default_tip($entry, $msec->get_check_default, $i);
+ set_help_tip($entry, $msec->get_check_default($i), $i);
$security_checks_value{$i}->set_popdown_strings(qw(yes no default));
$entry->set_text($msec->get_check_value($i));
[ gtkshow(new Gtk2::Label(translate($i))), $security_checks_value{$i} ];