summaryrefslogtreecommitdiffstats
path: root/perl-install/bootlook.pm
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-03-27 21:10:49 +0000
committerdamien <damien@mandriva.com>2001-03-27 21:10:49 +0000
commitcdd5eb8984c6f654436ba8192002118de4673afc (patch)
treef7e338905e5ce07a88e9d74a79a532e89bf65b78 /perl-install/bootlook.pm
parent054702733eba80c0cf1975d8a39cf01816782c67 (diff)
downloaddrakx-cdd5eb8984c6f654436ba8192002118de4673afc.tar
drakx-cdd5eb8984c6f654436ba8192002118de4673afc.tar.gz
drakx-cdd5eb8984c6f654436ba8192002118de4673afc.tar.bz2
drakx-cdd5eb8984c6f654436ba8192002118de4673afc.tar.xz
drakx-cdd5eb8984c6f654436ba8192002118de4673afc.zip
added kill USR2 before main
Diffstat (limited to 'perl-install/bootlook.pm')
-rw-r--r--perl-install/bootlook.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm
index c5f070aef..1b3100ea9 100644
--- a/perl-install/bootlook.pm
+++ b/perl-install/bootlook.pm
@@ -219,8 +219,11 @@ if ($a_mode) {
$pixmap->set($t_pixmap, $t_mask);
}
+Gtk->main_iteration while Gtk->events_pending;
+$::isEmbedded and kill USR2, $::CCPID;
$inmain=1;
-main Gtk;
+Gtk->main;
+Gtk->exit(0);
#-------------------------------------------------------------
# get user names to put in combo