summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLUtils.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/TeXLive/TLUtils.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index 128902db921..350caa303b8 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -3938,13 +3938,14 @@ sub query_ctan_mirror {
#
sub query_ctan_mirror_curl {
my $max_trial = 3;
+ my $warg = (win32() ? "-w %{url_effective} " : "-w '%{url_effective}' ");
for (my $i = 1; $i <= $max_trial; $i++) {
# -L -> follow redirects
# -s -> silent
# -w -> what to output after completion
my $cmd = "$::progs{'curl'} -Ls "
. "-o " . nulldev() . " "
- . "-w '%{url_effective}' "
+ . $warg
. "--connect-timeout $NetworkTimeout "
. "--max-time $NetworkTimeout "
. $TeXLiveServerURL;