summaryrefslogtreecommitdiff
path: root/Master/install-tl.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/install-tl.pl')
-rwxr-xr-xMaster/install-tl.pl7
1 files changed, 6 insertions, 1 deletions
diff --git a/Master/install-tl.pl b/Master/install-tl.pl
index c7c9c9424b7..8bf54006b5a 100755
--- a/Master/install-tl.pl
+++ b/Master/install-tl.pl
@@ -55,7 +55,12 @@ no utf8;
$::lang = "en";
if ($^O =~ /^MSWin(32|64)$/i) {
# trying to deduce automatically the country code
- $::lang = TeXLive::TLWinGoo::reg_country();
+ my $foo = TeXLive::TLWinGoo::reg_country();
+ if ($foo) {
+ $::lang = $foo;
+ } else {
+ tllog($::LOG_DEBUG, "Didn't get any usuful code from reg_country: $foo...\n");
+ }
} else {
# we load POSIX and locale stuff
require POSIX;