texlive[61996] Master/tlpkg/TeXLive/TLUtils.pm: (query_ctan_mirror):

[commits+karl at tug.org]

Revision: 61996
          http://tug.org/svn/texlive?view=revision&revision=61996
Author:   karl
Date:     2022-02-12 23:45:16 +0100 (Sat, 12 Feb 2022)
Log Message:
-----------
(query_ctan_mirror): double-quote the curl arg for Windows.
https://tug.org/pipermail/tex-live/2022-February/047748.html

Modified Paths:
--------------
    trunk/Master/tlpkg/TeXLive/TLUtils.pm

Modified: trunk/Master/tlpkg/TeXLive/TLUtils.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLUtils.pm	2022-02-12 21:18:31 UTC (rev 61995)
+++ trunk/Master/tlpkg/TeXLive/TLUtils.pm	2022-02-12 22:45:16 UTC (rev 61996)
@@ -4080,7 +4080,7 @@
 # 
 sub query_ctan_mirror_curl {
   my $max_trial = 3;
-  my $warg = (win32() ? "-w %{url_effective} " : "-w '%{url_effective}' ");
+  my $warg = (win32() ? '-w "%{url_effective}" ' : "-w '%{url_effective}' ");
   for (my $i = 1; $i <= $max_trial; $i++) {
     # -L -> follow redirects
     # -s -> silent