diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-07 14:36:19 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-24 23:28:15 +0100 |
commit | f1efadafd12954cbc0b46148577690f5c4f93ec8 (patch) | |
tree | 1a7241ec30afc3b2abf0902d11f96c89018c7e8f | |
parent | f9aab3be9183dabaf2f9df91be15ae5406ff74a4 (diff) | |
download | drakx-f1efadafd12954cbc0b46148577690f5c4f93ec8.tar drakx-f1efadafd12954cbc0b46148577690f5c4f93ec8.tar.gz drakx-f1efadafd12954cbc0b46148577690f5c4f93ec8.tar.bz2 drakx-f1efadafd12954cbc0b46148577690f5c4f93ec8.tar.xz drakx-f1efadafd12954cbc0b46148577690f5c4f93ec8.zip |
fix setting exceptions handler for Gtk3
rationale: whereas Glib's gtk_main() was called smoothly by Gtk2's XS, Gtk3
goes through Glib::Object::Introspection->invoke() which goes directly
to the typelib...
we thus needs to ask Gtk3 to overrides Gtk3->main
-rw-r--r-- | perl-install/mygtk3.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/mygtk3.pm b/perl-install/mygtk3.pm index 726524032..6c28c43ed 100644 --- a/perl-install/mygtk3.pm +++ b/perl-install/mygtk3.pm @@ -22,10 +22,10 @@ sub init() { if_($::isRestore, 'draksnapshot'), if_($::isInstall, 'urpmi'), 'drakx-net', 'drakx-kbd-mouse-x11', # shared translation @::textdomains; - Glib->enable_exceptions3; + Gtk3->enable_exceptions; } init() unless $::no_ugtk_init; -Glib->enable_exceptions3 if $::isInstall; +Gtk3->enable_exceptions if $::isInstall; |