diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-14 13:41:58 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-01-14 13:41:58 +0000 |
commit | 310a923aa40cbbd42ba76bd86d576a98b7f91acc (patch) | |
tree | 25d9b9f417b7c15ad717225ebba42871beccc0cf /perl-install/standalone | |
parent | e5f2882b9bf48fd02d8208e70fd5469b03fa684c (diff) | |
download | drakx-backup-do-not-use-310a923aa40cbbd42ba76bd86d576a98b7f91acc.tar drakx-backup-do-not-use-310a923aa40cbbd42ba76bd86d576a98b7f91acc.tar.gz drakx-backup-do-not-use-310a923aa40cbbd42ba76bd86d576a98b7f91acc.tar.bz2 drakx-backup-do-not-use-310a923aa40cbbd42ba76bd86d576a98b7f91acc.tar.xz drakx-backup-do-not-use-310a923aa40cbbd42ba76bd86d576a98b7f91acc.zip |
minor cleanup
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-x | perl-install/standalone/drakboot | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot index 1adc3d3d1..d054f173e 100755 --- a/perl-install/standalone/drakboot +++ b/perl-install/standalone/drakboot @@ -123,14 +123,8 @@ my $boot_pic = gtkcreate_img($themes{def_thmb}); change_image($boot_pic, $themes{default}); my $_thm_button = new Gtk2::Button(N("Install themes")); -my $logo_thm = new Gtk2::CheckButton(N("Display theme\nunder console")); -my $B_create = new Gtk2::Button(N("Create new theme")); +my $_B_create = gtksignal_connect(Gtk2::Button->new(N("Create new theme")), clicked => sub { system('/usr/sbin/draksplash ') }); my $keep_logo = 1; -$logo_thm->set_active(1); -$logo_thm->signal_connect(clicked => sub { invbool(\$keep_logo) }); -$B_create->signal_connect(clicked => sub { - system('/usr/sbin/draksplash '); - }); #- ******** action to take on changing combos values @@ -151,7 +145,8 @@ gtkadd($window, gtkpack__(new Gtk2::VBox(0, 5), N("\nTheme"), $combo{boot}, - $logo_thm), + gtksignal_connect(Gtk2::CheckButton->new(N("Display theme\nunder console")), clicked => sub { invbool(\$keep_logo) }), + ), Gtk2::VSeparator->new, gtkpack__(new Gtk2::VBox(0, 5), $boot_pic)) |