summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2009-10-13 17:55:46 +0000
committerOlivier Blin <oblin@mandriva.com>2009-10-13 17:55:46 +0000
commit5cac2226c04a1cd65d20e6eccad6c9c633190352 (patch)
tree301bc7d69a40214d6b680123657306221f00a26a /perl-install/any.pm
parent29a53d75292a01f432525b22ef4952b89b6b3501 (diff)
downloaddrakx-5cac2226c04a1cd65d20e6eccad6c9c633190352.tar
drakx-5cac2226c04a1cd65d20e6eccad6c9c633190352.tar.gz
drakx-5cac2226c04a1cd65d20e6eccad6c9c633190352.tar.bz2
drakx-5cac2226c04a1cd65d20e6eccad6c9c633190352.tar.xz
drakx-5cac2226c04a1cd65d20e6eccad6c9c633190352.zip
use UTF-8 for zh_TW (#53976)
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index feabbb7f0..aa601199a 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -1113,7 +1113,7 @@ when your installation is complete and you restart your system.")),
format => sub { $_[0] =~ /(.*\|)(.*)/ ? $1 . lang::l2name($2) : lang::l2name($_[0]) },
list => \@langs, sort => !$in->isa('interactive::gtk'), changed => sub {
#- very special cases for langs which do not like UTF-8
- $non_utf8 = $lang =~ /\bzh_TW/i if !$utf8_forced;
+ $non_utf8 = 0 if !$utf8_forced;
}, focus_out => sub { $langs->{$listval2val->($lang)} = 1 } },
{ val => \$non_utf8, type => 'bool', text => N("Old compatibility (non UTF-8) encoding"),
advanced => 1, changed => sub { $utf8_forced = 1 } },