diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2008-01-24 13:03:41 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2008-01-24 13:03:41 +0000 |
| commit | 1997d020ea4a42e3a708b6d9a0b6e11902449e7d (patch) | |
| tree | b017687d539948cef32adbb125eb36174223e2a9 /perl-install/mygtk2.pm | |
| parent | 21aeb4220e320371d871e2194ab4a9988e1a8599 (diff) | |
| download | drakx-1997d020ea4a42e3a708b6d9a0b6e11902449e7d.tar drakx-1997d020ea4a42e3a708b6d9a0b6e11902449e7d.tar.gz drakx-1997d020ea4a42e3a708b6d9a0b6e11902449e7d.tar.bz2 drakx-1997d020ea4a42e3a708b6d9a0b6e11902449e7d.tar.xz drakx-1997d020ea4a42e3a708b6d9a0b6e11902449e7d.zip | |
(init) move enabling catching exceptions here so that users of
::no_ugtk_init still get covered once calling init(), thus catching
exceptions
Diffstat (limited to 'perl-install/mygtk2.pm')
| -rw-r--r-- | perl-install/mygtk2.pm | 3 |
1 files changed, 2 insertions, 1 deletions
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; |