diff options
author | Karl Berry <karl@freefriends.org> | 2009-08-14 18:41:23 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2009-08-14 18:41:23 +0000 |
commit | 5388f00c13891629de47eb6d81e37a93816ccba4 (patch) | |
tree | 6ef26faea73a1515aec5381c4c3ec0105360db7e /Master/tlpkg/TeXLive | |
parent | fcdf996234b757543da72793f607457b7584d60d (diff) |
doc updates, force CPU=i386 (from Jukka Salmi, mail to karl 13 Aug 2009 01:12:49)
git-svn-id: svn://tug.org/texlive/trunk@14665 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index af41e4d73b2..03a695eee03 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -172,20 +172,19 @@ Windows and we set the global variable C<$::_platform_> to C<win32>. Otherwise we call C<config.guess>. The output of C<config.guess> is filtered as described below. -CPU type is determined by a regexp. And it's necessary to -C<s/i.86/i386/>. +CPU type is determined by a regexp, and any C</^i.86/> name is replaced +by C<i386>. -For OS we need a list because we probably have something like -C<linux-gnu> but we need C<linux>. This list might/should contain OSs -which are not currently supported. The list currently supports all -platforms supported by TeX Live 2007 plus Cygwin. +For OS we need a list because what's returned is not likely to match our +historical names, e.g., C<config.guess> returns C<linux-gnu> but we need +C<linux>. This list might/should contain OSs which are not currently +supported. If a particular platform is not found in this list we use the regexp C</.*-(.*$)/> as a last resort and hope it provides something useful. -The result is stored in a global variable C<$::_platform_>. If you call -C<platform> repeatedly, only the first call of C<platform> will access -the HD/CD/DVD. +The result is stored in a global variable C<$::_platform_>, and +subsequent calls just return that value. =cut @@ -219,7 +218,7 @@ sub platform { if ($OS eq "darwin") { $CPU = "universal"; # TL provides universal binaries } elsif ($CPU =~ /^i.86$/) { - $CPU =~ s/i.86/i386/; + $CPU =~ "i386"; # 586, 686, whatever } unless (defined $OS) { ($OS = $guessed_platform) =~ s/.*-(.*)/$1/; |