summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r--perl-install/ugtk2.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index c6fd1410d..5da13b44c 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -48,6 +48,7 @@ unless ($::no_ugtk_init) {
Gtk2->init;
c::bind_textdomain_codeset($_, 'UTF8') foreach 'libDrakX', @::textdomains;
$::need_utf8_i18n = 1;
+ Glib->install_exception_handler(sub { warn "$_[0]"; exit(255) }) if 0.95 < $Gtk2::VERSION;
}