diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-02-03 08:01:11 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-02-03 08:01:11 +0000 |
| commit | fa99c30b55ec476fccdf2a5089b9d865f3fd219f (patch) | |
| tree | 28cf74b9493451fd989510181bf83f1716a462e6 /perl-install/standalone/draksec | |
| parent | 9f194074adfecbd6e60897732511f32855acd163 (diff) | |
| download | drakx-backup-do-not-use-fa99c30b55ec476fccdf2a5089b9d865f3fd219f.tar drakx-backup-do-not-use-fa99c30b55ec476fccdf2a5089b9d865f3fd219f.tar.gz drakx-backup-do-not-use-fa99c30b55ec476fccdf2a5089b9d865f3fd219f.tar.bz2 drakx-backup-do-not-use-fa99c30b55ec476fccdf2a5089b9d865f3fd219f.tar.xz drakx-backup-do-not-use-fa99c30b55ec476fccdf2a5089b9d865f3fd219f.zip | |
display again the first notebook page
Diffstat (limited to 'perl-install/standalone/draksec')
| -rwxr-xr-x | perl-install/standalone/draksec | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/perl-install/standalone/draksec b/perl-install/standalone/draksec index bed8bc6c1..128c21453 100755 --- a/perl-install/standalone/draksec +++ b/perl-install/standalone/draksec @@ -132,19 +132,19 @@ my $common_opts = { col_spacings => 10, row_spacings => 5 }; ######################## BASIC OPTIONS PAGE ################################ my $seclevel_entry = new Gtk2::Combo(); -$notebook->append_page(gtkpack(new Gtk2::VBox(0, 0), - basic_seclevel_explanations($msec), - create_packtable($common_opts, - [ basic_seclevel_option(\$seclevel_entry, $msec) ], - [ new Gtk2::Label(N("Security Alerts:")), - my $secadmin_check = new Gtk2::CheckButton ], - [ new Gtk2::Label(N("Security Administrator:")), - my $secadmin_entry = new Gtk2::Entry ])), - new Gtk2::Label(N("Basic"))); - +$notebook->append_page(gtkshow(gtkpack(new Gtk2::VBox(0, 0), + basic_seclevel_explanations($msec), + create_packtable($common_opts, + [ basic_seclevel_option(\$seclevel_entry, $msec) ], + [ new Gtk2::Label(N("Security Alerts:")), + my $secadmin_check = new Gtk2::CheckButton ], + [ new Gtk2::Label(N("Security Administrator:")), + my $secadmin_entry = new Gtk2::Entry ]))), + new Gtk2::Label(N("Basic"))); + $secadmin_entry->set_text($msec->get_check_value("MAIL_USER")); $secadmin_check->set_active(1) if $msec->get_check_value("MAIL_WARN") eq "yes"; - + ######################### NETWORK & SYSTEM OPTIONS ######################### my @yesno_choices = qw(yes no default ignore); my @alllocal_choices = qw(ALL LOCAL NONE default); |