summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorJonathan Gotti <jgotti@mandriva.com>2002-08-21 09:20:34 +0000
committerJonathan Gotti <jgotti@mandriva.com>2002-08-21 09:20:34 +0000
commit1e59acd542b4a6465575abe763c41a20c1731e21 (patch)
tree2759fa2358fb519fe85117212ad06c93acb000b5 /perl-install
parenta863a436fc7313fd4b4d876540fe3d41902123a5 (diff)
downloaddrakx-backup-do-not-use-1e59acd542b4a6465575abe763c41a20c1731e21.tar
drakx-backup-do-not-use-1e59acd542b4a6465575abe763c41a20c1731e21.tar.gz
drakx-backup-do-not-use-1e59acd542b4a6465575abe763c41a20c1731e21.tar.bz2
drakx-backup-do-not-use-1e59acd542b4a6465575abe763c41a20c1731e21.tar.xz
drakx-backup-do-not-use-1e59acd542b4a6465575abe763c41a20c1731e21.zip
add link to draksplash
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootlook.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm
index de6262683..f5ad0cddc 100644
--- a/perl-install/bootlook.pm
+++ b/perl-install/bootlook.pm
@@ -142,10 +142,13 @@ my $lilo_pic = new Gtk::Pixmap(gtkcreate_png($themes{'def_thmb'}));
my $boot_pic = new Gtk::Pixmap(gtkcreate_png($themes{'def_thmb'}));
my $thm_button = new Gtk::Button(_("Install themes"));
my $logo_thm = new Gtk::CheckButton(_("Display theme under console"));
+my $B_create = new Gtk::Button(_("Create new theme"));
my $keep_logo = 1;
$logo_thm->set_active(1);
$logo_thm->signal_connect(clicked => sub { invbool(\$keep_logo) });
-
+$B_create->signal_connect(clicked => sub{
+ $::isEmbedded ? (kill('USR1', $::CCPID) and system('/usr/sbin/draksplash ')) : system('/usr/sbin/draksplash ') ;
+ });
#- ******** action to take on changing combos values
$combo{'thms'}->entry->signal_connect(changed => sub {
@@ -274,7 +277,8 @@ Click on Configure to launch the setup wizard.", $lilogrub),
gtkpack__(new Gtk::VBox(0,5),
_("Lilo screen"),
$combo{'lilo'},
- $lilo_pic),
+ $lilo_pic,
+ $B_create),
gtkpack__(new Gtk::VBox(0,5),
_("Bootsplash"),
$combo{'boot'},