texlive[42254] Master/tlpkg/TeXLive: convert some warnings to debugs
commits+preining at tug.org
commits+preining at tug.org
Tue Oct 11 03:22:03 CEST 2016
Revision: 42254
http://tug.org/svn/texlive?view=revision&revision=42254
Author: preining
Date: 2016-10-11 03:22:02 +0200 (Tue, 11 Oct 2016)
Log Message:
-----------
convert some warnings to debugs in support functions
Modified Paths:
--------------
trunk/Master/tlpkg/TeXLive/TLDownload.pm
trunk/Master/tlpkg/TeXLive/TLUtils.pm
Modified: trunk/Master/tlpkg/TeXLive/TLDownload.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLDownload.pm 2016-10-11 01:16:56 UTC (rev 42253)
+++ trunk/Master/tlpkg/TeXLive/TLDownload.pm 2016-10-11 01:22:02 UTC (rev 42254)
@@ -133,7 +133,7 @@
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;
Modified: trunk/Master/tlpkg/TeXLive/TLUtils.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLUtils.pm 2016-10-11 01:16:56 UTC (rev 42253)
+++ trunk/Master/tlpkg/TeXLive/TLUtils.pm 2016-10-11 01:22:02 UTC (rev 42254)
@@ -2423,12 +2423,12 @@
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 @@
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");
}
More information about the tex-live-commits
mailing list