summaryrefslogtreecommitdiff
path: root/Master/install-tl
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-06-05 23:36:51 +0000
committerKarl Berry <karl@freefriends.org>2010-06-05 23:36:51 +0000
commitf2c6f8a8877262f298913c7c36c0674912bb4b40 (patch)
treeed4dd4ae8a88f699446c3ca3979175c400bd8931 /Master/install-tl
parent9781545424b21ca99a7a8a7b669433733488e6b0 (diff)
indent new system/texlive/tlnet msg.
git-svn-id: svn://tug.org/texlive/trunk@18761 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl')
-rwxr-xr-xMaster/install-tl14
1 files changed, 7 insertions, 7 deletions
diff --git a/Master/install-tl b/Master/install-tl
index d7c43995ca5..92449bf7ed2 100755
--- a/Master/install-tl
+++ b/Master/install-tl
@@ -1225,7 +1225,7 @@ sub calc_depends {
sub load_tlpdb {
my $master = $location;
info("Loading $master/$TeXLive::TLConfig::InfraLocation/$TeXLive::TLConfig::DatabaseName\n");
- $tlpdb=TeXLive::TLPDB->new(root => "$master");
+ $tlpdb = TeXLive::TLPDB->new(root => $master);
if (!defined($tlpdb)) {
my $do_die = 1;
# if that failed, and:
@@ -1234,19 +1234,19 @@ sub load_tlpdb {
# then we simply add "/systems/texlive/tlnet" in case someone just
# gave an arbitrary CTAN mirror address without the full path
if ($media eq "NET" && $location !~ m/tlnet/) {
- tlwarn("First attempt for net installation failed.\n");
- tlwarn("Repository url does not contain \"tlnet\",\n");
- tlwarn("retrying with \"/systems/texlive/tlnet\" appended.\n");
+ tlwarn("First attempt for net installation failed;\n");
+ tlwarn(" repository url does not contain \"tlnet\",\n");
+ tlwarn(" retrying with \"/systems/texlive/tlnet\" appended.\n");
$location .= "/systems/texlive/tlnet";
$master = $location;
#
# since we change location, we reset the error count of the
# download object
- $::tldownload_server->enable if (defined($::tldownload_server));
+ $::tldownload_server->enable if defined($::tldownload_server);
#
- $tlpdb=TeXLive::TLPDB->new(root => "$master");
+ $tlpdb = TeXLive::TLPDB->new(root => $master);
if (!defined($tlpdb)) {
- tlwarn("Also that one did not help.\n");
+ tlwarn("Oh well, adding tlnet did not help.\n");
tlwarn(<<END_EXPLICIT_MIRROR);
You may want to try specifying an explicit or different CTAN mirror;