summaryrefslogtreecommitdiff
path: root/Master/tlpkg
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2009-08-14 18:41:23 +0000
committerKarl Berry <karl@freefriends.org>2009-08-14 18:41:23 +0000
commit5388f00c13891629de47eb6d81e37a93816ccba4 (patch)
tree6ef26faea73a1515aec5381c4c3ec0105360db7e /Master/tlpkg
parentfcdf996234b757543da72793f607457b7584d60d (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')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm19
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/;