From 182f384a817a982e1f078a496b68cae8edacb777 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 18 Apr 2016 21:56:02 +0000 Subject: just check for ^MSWin, not 32|64; who knows what the future will bring git-svn-id: svn://tug.org/texlive/trunk@40600 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/trans.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Master/tlpkg/TeXLive/trans.pl') diff --git a/Master/tlpkg/TeXLive/trans.pl b/Master/tlpkg/TeXLive/trans.pl index de98d258e18..09991f53a52 100644 --- a/Master/tlpkg/TeXLive/trans.pl +++ b/Master/tlpkg/TeXLive/trans.pl @@ -1,6 +1,6 @@ #!/usr/bin/env perl # $Id$ -# Copyright 2009-2012 Norbert Preining +# Copyright 2009-2016 Norbert Preining # This file is licensed under the GNU General Public License version 2 # or any later version. # @@ -30,7 +30,7 @@ if (defined($::opt_lang)) { $::lang = "zh_CN"; } } else { - if ($^O =~ /^MSWin(32|64)$/i) { + if ($^O =~ /^MSWin/i) { # trying to deduce automatically the country code my ($lang, $area) = TeXLive::TLWinGoo::reg_country(); if ($lang) { -- cgit v1.2.3