summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2017-06-27 13:51:08 +0000
committerNorbert Preining <preining@logic.at>2017-06-27 13:51:08 +0000
commit8c5cac8e6d6e7c854c59c7f192ee8280141bf82c (patch)
tree912e8392f5340fceac111727473556f9e09527cb
parent5f0ed3f8b22956096a1367c4c3148114cb247072 (diff)
tlmgrgui: fix CTAN mirror triggering switch to single repo mode
git-svn-id: svn://tug.org/texlive/trunk@44710 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xMaster/texmf-dist/scripts/texlive/tlmgrgui.pl6
1 files changed, 4 insertions, 2 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgrgui.pl b/Master/texmf-dist/scripts/texlive/tlmgrgui.pl
index 4ec43ca0456..920704b72e1 100755
--- a/Master/texmf-dist/scripts/texlive/tlmgrgui.pl
+++ b/Master/texmf-dist/scripts/texlive/tlmgrgui.pl
@@ -2646,8 +2646,10 @@ sub run_update_functions {
sub check_location_on_ctan {
# we want to check that if mirror.ctan.org
# is used that we select a mirror once
- if ($location =~ m/$TeXLive::TLConfig::TeXLiveServerURL/) {
- $location = TeXLive::TLUtils::give_ctan_mirror();
+ for my $k (keys %repos) {
+ if ($repos{$k} =~ m/$TeXLive::TLConfig::TeXLiveServerURL/) {
+ $repos{$k} = TeXLive::TLUtils::give_ctan_mirror();
+ }
}
}