summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-08-08 12:47:27 +0000
committerNorbert Preining <preining@logic.at>2008-08-08 12:47:27 +0000
commit82dbe385b48525b2fc2763750c146ca25ac0c7f9 (patch)
tree307da98f7d129d6776bdb346b3c7364a3c41eb1a
parent87c0a4d0b0163bc01e38d8ff279c1956fb26bb8d (diff)
GUI installer: support zh-tw and zh-cn also on unix
git-svn-id: svn://tug.org/texlive/trunk@10174 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/tlpkg/installer/install-menu-perltk.pl11
1 files changed, 11 insertions, 0 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl
index 1e19700d6c9..a740497a885 100644
--- a/Master/tlpkg/installer/install-menu-perltk.pl
+++ b/Master/tlpkg/installer/install-menu-perltk.pl
@@ -56,6 +56,17 @@ if (defined($::opt_lang)) {
my ($lang,$area,$codeset);
if ($loc =~ m/^([^_.]*)(_([^.]*))?(\.([^@]*))?(@.*)?$/) {
$lang = defined($1)?$1:"";
+ $area = defined($3)?$3:"";
+ if ($lang eq "zh") {
+ if ($area eq "CN") {
+ $lang = "zh-cn";
+ } elsif ($area eq "TW") {
+ $lang = "zh-tw";
+ } else {
+ # fallback to zh-cn! for HK and SG
+ $lang = "zh-cn";
+ }
+ }
}
$::lang = $lang if ($lang);
}