summaryrefslogtreecommitdiff
path: root/Master/install-tl.pl
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-01-23 17:50:54 +0000
committerNorbert Preining <preining@logic.at>2008-01-23 17:50:54 +0000
commit1e0c37bbf562412cf3073469ca0bd1bda220b163 (patch)
treee7dd8a9925ab54607911206a092bed8410306469 /Master/install-tl.pl
parent0e6b8081807ad9e08d813202dbeff1f729bf408a (diff)
checks
git-svn-id: svn://tug.org/texlive/trunk@6381 c570f23f-e606-0410-a88d-b1316a301751
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;