diff options
author | Karl Berry <karl@freefriends.org> | 2009-12-18 00:03:51 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2009-12-18 00:03:51 +0000 |
commit | 1fa23df425c96fd07c7e51f66129fc44db4a9212 (patch) | |
tree | d0dc08d032e4c48e380908a15874e31e99acccab /Master/tlpkg | |
parent | e43288ca6fd6292f5eb26e016f4ee754ee5e1d3c (diff) |
doc updates for persistence
git-svn-id: svn://tug.org/texlive/trunk@16441 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r-- | Master/tlpkg/TeXLive/TLDownload.pm | 14 | ||||
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 9 |
2 files changed, 10 insertions, 13 deletions
diff --git a/Master/tlpkg/TeXLive/TLDownload.pm b/Master/tlpkg/TeXLive/TLDownload.pm index 55ea323d0f3..e22e0eb6e0c 100644 --- a/Master/tlpkg/TeXLive/TLDownload.pm +++ b/Master/tlpkg/TeXLive/TLDownload.pm @@ -4,8 +4,6 @@ # # This file is licensed under the GNU General Public License version 2 # or any later version. -# - package TeXLive::TLDownload; @@ -35,7 +33,7 @@ if ($@) { require LWP::UserAgent; require HTTP::Status; $net_lib_avail = 1; - debug("LWP available!\n"); + ddebug("LWP available, doing persistent downloads.\n"); } @@ -101,15 +99,15 @@ C<TeXLive::TLDownload> -- TeX Live Download abstraction module =head1 DESCRIPTION -The C<TeXLive::TLDownload> is a simple wrapper around the LWP modules -that allows for persistent connections and different protocols. -At loading time it checks for the existence of the LWP module(s), -and sets C<$TeXLive::TLDownload::net_lib_avail> accordingly. +The C<TeXLive::TLDownload> is a wrapper around the LWP modules that +allows for persistent connections and different protocols. At load +time it checks for the existence of the LWP module(s), and sets +C<$TeXLive::TLDownload::net_lib_avail> accordingly. =head2 Using proxies Please see C<LWP::UserAgent> for details, in a nut shell one can -specify proxies by setting C<I<protocol>_proxy> variable. +specify proxies by setting C<I<protocol>_proxy> variables. =head1 SEE ALSO diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 6dc3022ece9..7e87a5c6f9f 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -2998,17 +2998,16 @@ sub conv_to_w32_path { =item C<setup_persistent_downloads()> -Setup the system to use persistent connections using LWP/TLDownload. +Set up to use persistent connections using LWP/TLDownload. =cut sub setup_persistent_downloads { - if (!$TeXLive::TLDownload::net_lib_avail) { - tlwarn("Cannot set up persistent connections, LWP is missing.\n"); - return 0; + if ($TeXLive::TLDownload::net_lib_avail) { + return ($::tldownload_server = TeXLive::TLDownload->new); } - return ($::tldownload_server = TeXLive::TLDownload->new); + return 0; } =item C<give_ctan_mirror()> |