diff options
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 3fb87a0759b..547f9a70edc 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -3223,21 +3223,22 @@ sub forward_slashify { =item C<setup_persistent_downloads()> -Set up to use persistent connections using LWP/TLDownload. +Set up to use persistent connections using LWP/TLDownload, that is look +for a download server. Return the TLDownload object if successful, else +false. =cut -sub setup_persistent_downloads -{ +sub setup_persistent_downloads { if ($TeXLive::TLDownload::net_lib_avail) { - debug("setting up persistent downloads succeeded!\n"); + ddebug("setup_persistent_downloads has net_lib_avail set\n"); $::tldownload_server = TeXLive::TLDownload->new; if (!defined($::tldownload_server)) { - debug("TLUtils:setup_persistent_downloads: ::tldownload_server undefined\n"); + ddebug("TLUtils:setup_persistent_downloads: failed to get ::tldownload_server\n"); } else { - debug("TLUtils:setup_persistent_downloads: succeeded in getting ::tldownload_server\n"); + ddebug("TLUtils:setup_persistent_downloads: got ::tldownload_server\n"); } - return ($::tldownload_server); + return $::tldownload_server; } return 0; } |