summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-03-04 14:04:17 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-03-04 14:04:17 +0000
commita37fbc44bac2b5a2ad48e93e4445f02f54b24b0e (patch)
tree0f11261a8f67096d9e9bef396544f9129972d2c7 /perl-install/ugtk2.pm
parente333524e77a1cabf18df3ac66af7942be210ea0f (diff)
downloaddrakx-a37fbc44bac2b5a2ad48e93e4445f02f54b24b0e.tar
drakx-a37fbc44bac2b5a2ad48e93e4445f02f54b24b0e.tar.gz
drakx-a37fbc44bac2b5a2ad48e93e4445f02f54b24b0e.tar.bz2
drakx-a37fbc44bac2b5a2ad48e93e4445f02f54b24b0e.tar.xz
drakx-a37fbc44bac2b5a2ad48e93e4445f02f54b24b0e.zip
enable exception managment even at install time (installer set $::no_ugtk_init)
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r--perl-install/ugtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 1b25aa25f..11e6a6c4b 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -48,8 +48,8 @@ unless ($::no_ugtk_init) {
Gtk2->init;
c::bind_textdomain_codeset($_, 'UTF8') foreach 'libDrakX', @::textdomains;
$::need_utf8_i18n = 1;
- Gtk2->croak_execeptions if 0.95 < $Gtk2::VERSION;
}
+Gtk2->croak_execeptions if (!$::no_ugtk_init || $::isInstall) && 0.95 < $Gtk2::VERSION ;
$border = 5;