diff options
| author | Karl Berry <karl@freefriends.org> | 2019-08-07 22:27:00 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2019-08-07 22:27:00 +0000 |
| commit | 282e3b09880bce47524fd4ddee629b1791ce6c06 (patch) | |
| tree | 7db3545ad814f6918aec738186cc218a4011dc4a | |
| parent | a29489932ca8cb92d94b1c858c1590534921639b (diff) | |
(only_load_remote): ignore trailing
/texlive.tlpdb, too.
git-svn-id: svn://tug.org/texlive/trunk@51840 c570f23f-e606-0410-a88d-b1316a301751
| -rwxr-xr-x | Master/install-tl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Master/install-tl b/Master/install-tl index ddfbb026e74..84a61a9814a 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -775,7 +775,8 @@ sub only_load_remote { $location = $selected_location if defined($selected_location); $location || ($location = "$::installerdir"); if ($location =~ m!^(ctan$|(https?|ftp)://)!i) { - $location =~ s,/(tlpkg|archive)?/*$,,; # remove any trailing tlpkg or / + # remove any trailing tlpkg[/texlive.tlpdb] or / + $location =~ s,/(tlpkg(/texlive\.tlpdb)?|archive)?/*$,,; if ($location =~ m/^ctan$/i) { $location = TeXLive::TLUtils::give_ctan_mirror(); } elsif ($location =~ m/^$TeXLiveServerURL/) { |