summaryrefslogtreecommitdiffstats
path: root/perl-install/lang.pm
diff options
context:
space:
mode:
authorPablo Saratxaga <pablo@mandriva.com>2003-10-10 17:20:02 +0000
committerPablo Saratxaga <pablo@mandriva.com>2003-10-10 17:20:02 +0000
commitdccbe77e804acf6427924fdb1bf3740141c533d8 (patch)
tree06ef513cfd33e0b61da0190a60917910c0c8e246 /perl-install/lang.pm
parent7cad0d1d8ba5b05803097bb7dc46e3abeb6ef9b5 (diff)
downloaddrakx-dccbe77e804acf6427924fdb1bf3740141c533d8.tar
drakx-dccbe77e804acf6427924fdb1bf3740141c533d8.tar.gz
drakx-dccbe77e804acf6427924fdb1bf3740141c533d8.tar.bz2
drakx-dccbe77e804acf6427924fdb1bf3740141c533d8.tar.xz
drakx-dccbe77e804acf6427924fdb1bf3740141c533d8.zip
Some KDE screens require new chinese translations naming (zh_CN/zh_TW) to
display the translations
Diffstat (limited to 'perl-install/lang.pm')
-rw-r--r--perl-install/lang.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index e5f35fb31..8ad8ca12a 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -628,7 +628,7 @@ sub get_kde_lang {
#- get it using
#- echo C $(rpm -qp --qf "%{name}\n" /RPMS/kde-i18n-* | sed 's/kde-i18n-//')
- my @valid_kde_langs = qw(C af ar az bg bs ca cs da de el en_GB eo es et eu fa fi fr he hr hu is it ja ko lt lv mk mt nb nl nn pl pt pt_BR ro ru se sk sl sr sv ta th tr uk vi xh zh_CN.GB2312 zh_TW.Big5 zu);
+ my @valid_kde_langs = qw(C af ar az bg bs ca cs da de el en_GB eo es et eu fa fi fr he hr hu is it ja ko lt lv mk mt nb nl nn pl pt pt_BR ro ru se sk sl sr sv ta th tr uk vi xh zh_CN zh_TW zu);
my %valid_kde_langs; @valid_kde_langs{@valid_kde_langs} = ();
my $valid_lang = sub {
@@ -637,7 +637,7 @@ sub get_kde_lang {
my %fixlangs = (en => 'C', en_US => 'C',
'sr@Latn' => 'sr',
st => 'nso', ve => 'ven',
- zh_CN => 'zh_CN.GB2312', zh_SG => 'zh_CN.GB2312', zh_TW => 'zh_TW.Big5', zh_HK => 'zh_TW.Big5');
+ zh_CN => 'zh_CN', zh_SG => 'zh_CN', zh_TW => 'zh_TW', zh_HK => 'zh_TW');
exists $fixlangs{$lang} ? $fixlangs{$lang} :
exists $valid_kde_langs{$lang} ? $lang :
exists $valid_kde_langs{substr($lang, 0, 2)} ? substr($lang, 0, 2) : '';