summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/NEWS2
-rw-r--r--perl-install/mygtk2.pm3
2 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 9f2014ca7..6f707be6a 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,6 +1,8 @@
- bootloader-config, diskdrake:
o look for LVM PV on non partitioned disk before looking for DOS
partition_table (esp. for lilo which puts the DOS magic)
+- mygtk2: make sure users of ::no_ugtk_init (eg: drakbug) do catch
+ exceptions in callbacks
Version 10.6.6 - 22 January 2008
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index d9702a080..16d0c302d 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -22,9 +22,10 @@ sub init() {
Locale::gettext::bind_textdomain_codeset($_, 'UTF8') foreach 'libDrakX', if_(!$::isInstall, 'libDrakX-standalone'),
'drakx-net', 'drakx-kbd-mouse-x11', # shared translation
@::textdomains;
+ Gtk2->croak_execeptions;
}
init() unless ($::no_ugtk_init);
-Gtk2->croak_execeptions if (!$::no_ugtk_init || $::isInstall);
+Gtk2->croak_execeptions if $::isInstall;