summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-10-30 23:06:52 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-10-30 23:06:52 +0000
commit43d5e4e50276c0bb68c3f4c1abfd18bfe6918b55 (patch)
tree037b29332778d0c16e8601386293b15d3b670bc2
parent2b044f3fa4a763c67b4f9ef847598193f1462efd (diff)
downloaddrakx-43d5e4e50276c0bb68c3f4c1abfd18bfe6918b55.tar
drakx-43d5e4e50276c0bb68c3f4c1abfd18bfe6918b55.tar.gz
drakx-43d5e4e50276c0bb68c3f4c1abfd18bfe6918b55.tar.bz2
drakx-43d5e4e50276c0bb68c3f4c1abfd18bfe6918b55.tar.xz
drakx-43d5e4e50276c0bb68c3f4c1abfd18bfe6918b55.zip
handle new exception system from perl-Glib >= 0.96
-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;
}