summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-09-18 00:04:50 +0000
committerNorbert Preining <preining@logic.at>2009-09-18 00:04:50 +0000
commitf7cb554d9f357ee136fc9fd059a9ddbef3469294 (patch)
treee8741b1a92e3557077d9cbbb3471ffc608a475d5
parent565ba2d2efdefec90a5dcaa2a5f0a52de08410cb (diff)
fix uninitialized strings after move of the force-arch code
git-svn-id: svn://tug.org/texlive/trunk@15354 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xMaster/install-tl4
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/install-tl b/Master/install-tl
index ccca573033b..c609051e6ae 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -346,10 +346,10 @@ if (defined($opt_force_arch)) {
tlwarn("Overriding platform to $opt_force_arch\n");
$::_platform_ = $opt_force_arch;
}
-$vars{'this_platform'} = $::_platform_;
# initialize the correct platform
platform();
+$vars{'this_platform'} = $::_platform_;
# we do not support cygwin < 1.7, so check for that
if (!$opt_custom_bin && (platform() eq "i386-cygwin")) {
@@ -401,7 +401,7 @@ if ($location =~ m!^(ctan$|(http|ftp)://)!i) {
}
info("Installing TeX Live $TeXLive::TLConfig::ReleaseYear from: $location\n");
-info("Platform: ", platform, " => \'", platform_desc(platform), "\'\n");
+info("Platform: ", platform(), " => \'", platform_desc(platform), "\'\n");
if ($opt_custom_bin) {
if (-d $opt_custom_bin) {
info("Platform overridden, binaries taken from $opt_custom_bin\nand put into bin/custom!\n");