summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Master/tlpkg/TeXLive/TLDownload.pm2
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm8
2 files changed, 5 insertions, 5 deletions
diff --git a/Master/tlpkg/TeXLive/TLDownload.pm b/Master/tlpkg/TeXLive/TLDownload.pm
index 61ea332bc92..1633add6413 100644
--- a/Master/tlpkg/TeXLive/TLDownload.pm
+++ b/Master/tlpkg/TeXLive/TLDownload.pm
@@ -133,7 +133,7 @@ sub get_file {
return $outfh;
}
} else {
- tlwarn("TLDownload::get_file: response error: "
+ debug("TLDownload::get_file: response error: "
. $response->status_line . " (for $url)\n");
$self->incr_errorcount;
return;
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 75027dfdd23..a5b58a4791d 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -2423,12 +2423,12 @@ sub download_file {
debug("persistent connection set up, trying to get $url (for $dest)\n");
$ret = $::tldownload_server->get_file($url, $dest);
if ($ret) {
- debug("downloading file via persistent connection succeeded\n");
+ ddebug("downloading file via persistent connection succeeded\n");
return $ret;
} else {
- tlwarn("TLUtils::download_file: persistent connection ok,"
+ debug("TLUtils::download_file: persistent connection ok,"
. " but download failed: $url\n");
- tlwarn("TLUtils::download_file: retrying with wget.\n");
+ debug("TLUtils::download_file: retrying with wget.\n");
$wget_retry = 1; # just so we can give another msg.
}
} else {
@@ -2444,7 +2444,7 @@ sub download_file {
my $ret = _download_file($url, $dest, $wget);
if ($wget_retry) {
- tlwarn("TLUtils::download_file: retry with wget "
+ debug("TLUtils::download_file: retry with wget "
. ($ret ? "succeeded" : "failed") . ": $url\n");
}