summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/draksec
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-07-18 12:52:51 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-07-18 12:52:51 +0000
commite3d3f855979a9c0b88480c39f14395203c231d3e (patch)
tree6d6ffc570580e6815f9abfd2806b47b73bcff61d /perl-install/standalone/draksec
parentde4be8479d33276e6ba3d0eb952ac24f5d9badb1 (diff)
downloaddrakx-backup-do-not-use-e3d3f855979a9c0b88480c39f14395203c231d3e.tar
drakx-backup-do-not-use-e3d3f855979a9c0b88480c39f14395203c231d3e.tar.gz
drakx-backup-do-not-use-e3d3f855979a9c0b88480c39f14395203c231d3e.tar.bz2
drakx-backup-do-not-use-e3d3f855979a9c0b88480c39f14395203c231d3e.tar.xz
drakx-backup-do-not-use-e3d3f855979a9c0b88480c39f14395203c231d3e.zip
now that we display localized descriptions instead of raw function
names, we've to sort the formers instead of sorting the laters
Diffstat (limited to 'perl-install/standalone/draksec')
-rwxr-xr-xperl-install/standalone/draksec6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/draksec b/perl-install/standalone/draksec
index 81b42fd93..76c4edec8 100755
--- a/perl-install/standalone/draksec
+++ b/perl-install/standalone/draksec
@@ -179,8 +179,8 @@ foreach ([ 'network', N("Network Options") ], [ 'system', N("System Options") ])
}
$entry->set_text(to_i18n($msec->get_function_value($i)));
set_help_tip($entry, $default, $i);
- [ new_wrapped_label($fields{$i} || $i), $values{$i} ];
- } sort $msec->list_functions($domain))))),
+ [ new_wrapped_label($i), $values{$i} ];
+ } sort map { $fields{$_} || $_ } $msec->list_functions($domain))))),
new_wrapped_label($label));
$options_values{$domain} = \%values;
}
@@ -197,7 +197,7 @@ $notebook->append_page(gtkshow(create_scrolled_window(gtkpack_(new Gtk2::VBox(0,
my $entry = $security_checks_value{$i}->entry;
set_help_tip($entry, $msec->get_check_default($i), $i);
[ gtkshow(new_wrapped_label($fields{$i} || translate($i))), $security_checks_value{$i} ];
- } sort $msec->list_checks)))),
+ } sort map { $fields{$_} } $msec->list_checks)))),
new Gtk2::Label(N("Periodic Checks")));