summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-10-18 01:31:17 +0000
committerNorbert Preining <preining@logic.at>2009-10-18 01:31:17 +0000
commit58c675def03a7c4f9e78ca511d65402c61fb1b1e (patch)
tree7a6b5132f9fcef3afde68311f103df51eec30599 /Master/tlpkg/TeXLive
parent27bca3c79a7fe6e9a882645091d74d44b3d815ce (diff)
fix type, we need to echo out the base URL in give_ctan_mirror_base
git-svn-id: svn://tug.org/texlive/trunk@15820 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 7e158279d46..f839d04d5bc 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -3011,7 +3011,7 @@ sub give_ctan_mirror_base
. (win32() ? "nul" : "/dev/null") . " 2>&1";
my @out = `$cmd`;
# analyze the output for the mirror actually selected.
- my $mirror = $TeXLiveURL;
+ my $mirror = $TeXLiveServerURL;
foreach (@out) {
if (m/^Location: (\S*)\s*.*$/) {
(my $mhost = $1) =~ s,/*$,,; # remove trailing slashes since we add it