diff options
Diffstat (limited to 'Master/install-tl.pl')
-rwxr-xr-x | Master/install-tl.pl | 7 |
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; |