summaryrefslogtreecommitdiffstats
path: root/perl-install/bootlook.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-02-24 07:36:00 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-02-24 07:36:00 +0000
commit04a32a7f6b48a977c768d62a1c28f00958e0c9df (patch)
tree05ea561bbfdbb2819f457e37b6f8d197540e3bf1 /perl-install/bootlook.pm
parente58ebc9dfceda9a7ceaab42e1aacb85724e65f96 (diff)
downloaddrakx-backup-do-not-use-04a32a7f6b48a977c768d62a1c28f00958e0c9df.tar
drakx-backup-do-not-use-04a32a7f6b48a977c768d62a1c28f00958e0c9df.tar.gz
drakx-backup-do-not-use-04a32a7f6b48a977c768d62a1c28f00958e0c9df.tar.bz2
drakx-backup-do-not-use-04a32a7f6b48a977c768d62a1c28f00958e0c9df.tar.xz
drakx-backup-do-not-use-04a32a7f6b48a977c768d62a1c28f00958e0c9df.zip
- clean up embedding; since socket get automatically destroyed on child exit
and since they emit plug-removed at that moment, it's just cleaner to centralize/consolidate the child exit in mcc this of course, need a newer up-to-date mcc what's more, it allows to remove the somewhat mythical "$::isEmbedded and kill 'USR1', $::CCPID;" - drakautoinst, drakxservices, keyboardrake: fix fscking embedding managment
Diffstat (limited to 'perl-install/bootlook.pm')
-rw-r--r--perl-install/bootlook.pm10
1 files changed, 5 insertions, 5 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm
index 2736befa0..c525673f5 100644
--- a/perl-install/bootlook.pm
+++ b/perl-install/bootlook.pm
@@ -45,7 +45,7 @@ my $inmain = 0;
my $lilogrub = chomp_(`detectloader -q`);
my $window = $::isEmbedded ? new Gtk2::Plug($::XID) : new Gtk2::Window("toplevel");
-$window->signal_connect(delete_event => sub { $::isEmbedded ? kill('USR1', $::CCPID) : Gtk2->exit(0) });
+$window->signal_connect(delete_event => sub { utk2->exit(0) });
$window->set_title(N("Boot Style Configuration"));
$window->set_border_width(2);
#$window->realize;
@@ -64,7 +64,7 @@ $window->set_border_width(2);
# the menus are not shown
# but they provides shiny shortcut like C-q
my @menu_items = ({ path => N("/_File"), type => '<Branch>' },
- { path => N("/File/_Quit"), accelerator => N("<control>Q"), callback => sub { $::isEmbedded ? kill('USR1', $::CCPID) : Gtk2->exit(0) } },
+ { path => N("/File/_Quit"), accelerator => N("<control>Q"), callback => sub { ugtk2->exit(0) } },
);
my $menubar = create_factory_menu($window, @menu_items);
######### menus end
@@ -139,7 +139,7 @@ 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 ');
+ system('/usr/sbin/draksplash ');
});
#- ******** action to take on changing combos values
@@ -326,8 +326,8 @@ Click on Configure to launch the setup wizard.", $lilogrub),
)
),
gtkadd(gtkset_layout(new Gtk2::HButtonBox, 'end'),
- gtksignal_connect(new Gtk2::Button(N("OK")), clicked => sub { Xconfig::various::runlevel($x_mode ? 5 : 3); updateAutologin(); updateAurora(); $::isEmbedded ? kill('USR1',$::CCPID) : Gtk2->exit(0) }),
- gtksignal_connect(new Gtk2::Button(N("Cancel")), clicked => sub { $::isEmbedded ? kill('USR1', $::CCPID) : Gtk2->exit(0) })
+ gtksignal_connect(new Gtk2::Button(N("OK")), clicked => sub { Xconfig::various::runlevel($x_mode ? 5 : 3); updateAutologin(); updateAurora(); ugtk2->exit(0) }),
+ gtksignal_connect(new Gtk2::Button(N("Cancel")), clicked => sub { ugtk2->exit(0) })
)
)
);