summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLWinGoo.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/TeXLive/TLWinGoo.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLWinGoo.pm11
1 files changed, 6 insertions, 5 deletions
diff --git a/Master/tlpkg/TeXLive/TLWinGoo.pm b/Master/tlpkg/TeXLive/TLWinGoo.pm
index 93ca9ea3bb2..9900e6d4f4d 100644
--- a/Master/tlpkg/TeXLive/TLWinGoo.pm
+++ b/Master/tlpkg/TeXLive/TLWinGoo.pm
@@ -241,11 +241,12 @@ sub reg_country {
return 0 unless $lm;
debug("found lang codes value = $value, lm = $lm...\n");
if ($lm) {
- if ($lm =~ m/^zh-(cn|tw)$/) {
- return($lm);
- } elsif ($lm =~ m/^zh-/) {
- # anything else is mapped to simplified chinese for now
- return("zh-cn");
+ if ($lm =~ m/^zh-(tw|hk)$/i) {
+ return ("zh-tw");
+ } elsif ($lm =~ m/^zh/) {
+ # for anything else starting with zh return, that is zh, zh-cn, zh-sg
+ # and maybe something else
+ return ("zh-cn");
} else {
return(substr $lm, 0, 2);
}