diff options
| author | Norbert Preining <preining@logic.at> | 2008-01-23 17:27:05 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2008-01-23 17:27:05 +0000 |
| commit | 0e6b8081807ad9e08d813202dbeff1f729bf408a (patch) | |
| tree | 65ea30f2614734984e111a7979b9ccbc95683d81 /Master/install-tl.pl | |
| parent | 5e600005bf6368a8f46e69f961e347e5e17bd215 (diff) | |
lang guessing for windows
git-svn-id: svn://tug.org/texlive/trunk@6380 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl.pl')
| -rwxr-xr-x | Master/install-tl.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Master/install-tl.pl b/Master/install-tl.pl index 638145339bc..c7c9c9424b7 100755 --- a/Master/install-tl.pl +++ b/Master/install-tl.pl @@ -53,7 +53,10 @@ no utf8; # default language $::lang = "en"; -if ($^O !~ /^MSWin(32|64)$/i) { +if ($^O =~ /^MSWin(32|64)$/i) { + # trying to deduce automatically the country code + $::lang = TeXLive::TLWinGoo::reg_country(); +} else { # we load POSIX and locale stuff require POSIX; import POSIX qw/locale_h/; |