diff options
| author | Mystery Man 580 <uid580@mandriva.org> | 2002-12-04 08:30:50 +0000 |
|---|---|---|
| committer | Mystery Man 580 <uid580@mandriva.org> | 2002-12-04 08:30:50 +0000 |
| commit | ac5763aa5e12f24a2d78c52821597a7dcc9653ec (patch) | |
| tree | 208c11330505a89d8aa68c4717b8b724b74f246e /perl-install/security/main.pm | |
| parent | 2ebc30b9f3e095ede23f9119bb382b90e97287a5 (diff) | |
| download | drakx-ac5763aa5e12f24a2d78c52821597a7dcc9653ec.tar drakx-ac5763aa5e12f24a2d78c52821597a7dcc9653ec.tar.gz drakx-ac5763aa5e12f24a2d78c52821597a7dcc9653ec.tar.bz2 drakx-ac5763aa5e12f24a2d78c52821597a7dcc9653ec.tar.xz drakx-ac5763aa5e12f24a2d78c52821597a7dcc9653ec.zip | |
share common options
Diffstat (limited to 'perl-install/security/main.pm')
| -rw-r--r-- | perl-install/security/main.pm | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/perl-install/security/main.pm b/perl-install/security/main.pm index baa0fa95b..00b2a79b4 100644 --- a/perl-install/security/main.pm +++ b/perl-install/security/main.pm @@ -100,13 +100,15 @@ sub draksec_main { # Create the notebook (for bookmarks at the top) my $notebook = create_notebook(); $notebook->set_tab_pos('top'); + + my $common_opts = { col_spacings => 10, row_spacings => 5 }; ######################## BASIC OPTIONS PAGE ################################ my $seclevel_entry = new Gtk2::Combo(); - $notebook->append_page(gtkpack__(gtkshow(my $basic_page = new Gtk2::VBox(0, 0)), + $notebook->append_page(gtkpack(my $basic_page = new Gtk2::VBox(0, 0), basic_seclevel_explanations($msec), - create_packtable ({ col_spacings => 10, row_spacings => 5 }, + create_packtable ($common_opts, [ basic_seclevel_option(\$seclevel_entry, $msec) ], [ new Gtk2::Label(N("Security Alerts:")), my $secadmin_check = new Gtk2::CheckButton ], @@ -129,7 +131,7 @@ sub draksec_main { $notebook->append_page(gtkshow(create_scrolled_window(gtkpack(new Gtk2::VBox(0, 0), new Gtk2::Label(N("The following options can be set to customize your\nsystem security. If you need explanations, click on Help.\n")), - create_packtable({ col_spacings => 10, row_spacings => 5 }, + create_packtable($common_opts, map { my $i = $_; @@ -160,9 +162,9 @@ sub draksec_main { $notebook->append_page(gtkshow(create_scrolled_window(gtkpack(new Gtk2::VBox(0, 0), new Gtk2::Label(N("The following options can be set to customize your\nsystem security. If you need explanations, click on Help.\n")), - create_packtable({ col_spacings => 10, row_spacings => 5 }, + create_packtable($common_opts, map { - if (!member(qw(MAIL_WARN MAIL_USER), $_)) { + unless (member(qw(MAIL_WARN MAIL_USER), $_)) { my $i = $_; $security_checks_value{$i} = new_editable_combo(); my $entry = $security_checks_value{$i}->entry; |