summaryrefslogtreecommitdiff
path: root/Master/install-tl
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2008-10-24 18:37:09 +0000
committerKarl Berry <karl@freefriends.org>2008-10-24 18:37:09 +0000
commit1635be4beb5e2716cbb44348cdceb40c6f210847 (patch)
tree82e97310fa1b0dda059d6864f75575282e9a486b /Master/install-tl
parent64b3f572c1a924b6b61b1c2fe37a0b38fa21b398 (diff)
report source and target directories, not install-tl location
git-svn-id: svn://tug.org/texlive/trunk@11043 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl')
-rwxr-xr-xMaster/install-tl10
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/install-tl b/Master/install-tl
index 10c66ac819c..db8545428c3 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -158,9 +158,9 @@ $::alternative_selector = 0;
# if we find a file installation.profile we ask the user whether we should
# continue with the installation
-# note, we are in the installer directory!
+# note, we are in the installer directory.
if (-r "installation.profile") {
- print "ABORTED INSTALLATION FOUND: $localpath/installation.profile!!!\n";
+ print "ABORTED INSTALLATION FOUND: $localpath/installation.profile\n";
print "Do you want to continue with the exact same settings as before (y/N): ";
my $answer = <STDIN>;
if ($answer =~ m/^y(es)?$/i) {
@@ -346,7 +346,7 @@ if ($location =~ m!^(http|ftp)://!i) {
$media = 'NET';
}
}
-
+info("Installing from: $location\n");
info("Platform: ", platform, " => \'", platform_desc(platform), "\'\n");
if ($media eq "DVD") {
@@ -359,8 +359,7 @@ if ($media eq "DVD") {
} else {
info("Distribution: $media\n");
}
-info("Directory for temporary files: '", $system_tmpdir, "\'\n");
-info("Installer directory: '$localpath'\n");
+info("Directory for temporary files: $system_tmpdir\n");
if ($opt_from_dvd and ($media ne "DVD")) {
print "Not running from DVD; 'from_dvd' option not applicable\n";
@@ -476,6 +475,7 @@ if (!$finished) {
# in case it is the root of a drive
$vars{'TEXDIR'} =~ s![/\\]$!!;
$vars{'TEXDIRW'} =~ s![/\\]$!!;
+ info("Installing to: $vars{TEXDIR}\n");
do_installation();
}