summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2003-06-11 20:23:04 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2003-06-11 20:23:04 +0000
commit20b3df1f92971aac987d0e6ce0f32a03c35680ee (patch)
tree4c891a39628a12539e6fdafc33b8276bba462798 /perl-install/ugtk2.pm
parent3b8885e22af6283a1bb0467eed587ead5b30a310 (diff)
downloaddrakx-20b3df1f92971aac987d0e6ce0f32a03c35680ee.tar
drakx-20b3df1f92971aac987d0e6ce0f32a03c35680ee.tar.gz
drakx-20b3df1f92971aac987d0e6ce0f32a03c35680ee.tar.bz2
drakx-20b3df1f92971aac987d0e6ce0f32a03c35680ee.tar.xz
drakx-20b3df1f92971aac987d0e6ce0f32a03c35680ee.zip
get_text_coord: fix wrapping broken (gc sux)
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 5c581ed54..db10afab5 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -644,7 +644,7 @@ sub get_text_coord {
my $flag = 1;
my @t = split($wrap_char, $text);
my @t2;
- if ($::isInstall && $::o->{lang} =~ /ja|zh/) {
+ if ($::isInstall && $::o->{locale}{lang} =~ /ja|zh/) {
@t = map { $_ . $wrap_char } @t;
$wrap_char = '';
foreach (@t) {