summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 5e9e631998c..2af7b8d65fb 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -3501,7 +3501,9 @@ sub create_mirror_list {
for my $mirror (@mirrors) {
my $mfull = $mirror;
$mfull =~ s!/$!!;
- $mfull .= "/" . $TeXLive::TLConfig::TeXLiveServerPath;
+ # do not append the server path part here, but add
+ # it down there in the extract mirror entry
+ #$mfull .= "/" . $TeXLive::TLConfig::TeXLiveServerPath;
#if ($first) {
my $country_str = sprintf "%-12s", $country;
push @ret, " $country_str $mfull";
@@ -3520,7 +3522,7 @@ sub create_mirror_list {
sub extract_mirror_entry {
my $ent = shift;
my @foo = split ' ', $ent;
- return $foo[$#foo];
+ return $foo[$#foo] . "/" . $TeXLive::TLConfig::TeXLiveServerPath;
}
sub tlmd5 {