diff options
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/TeXLive/TLUtils.pm')
-rw-r--r-- | systems/texlive/tlnet/tlpkg/TeXLive/TLUtils.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/systems/texlive/tlnet/tlpkg/TeXLive/TLUtils.pm b/systems/texlive/tlnet/tlpkg/TeXLive/TLUtils.pm index 98e17b7ecc..db2ef3421c 100644 --- a/systems/texlive/tlnet/tlpkg/TeXLive/TLUtils.pm +++ b/systems/texlive/tlnet/tlpkg/TeXLive/TLUtils.pm @@ -1,4 +1,4 @@ -# $Id: TLUtils.pm 59237 2021-05-17 00:41:40Z preining $ +# $Id: TLUtils.pm 59259 2021-05-18 21:39:53Z karl $ # TeXLive::TLUtils.pm - the inevitable utilities for TeX Live. # Copyright 2007-2021 Norbert Preining, Reinhard Kotucha # This file is licensed under the GNU General Public License version 2 @@ -6,7 +6,7 @@ package TeXLive::TLUtils; -my $svnrev = '$Revision: 59237 $'; +my $svnrev = '$Revision: 59259 $'; my $_modulerevision = ($svnrev =~ m/: ([0-9]+) /) ? $1 : "unknown"; sub module_revision { return $_modulerevision; } @@ -2592,7 +2592,9 @@ sub setup_programs { if (grep(/\+ssl/, @lines)) { $::progs{'options'}{'wget-ssl'} = 1; my @wgetargs = @{$TeXLive::TLConfig::FallbackDownloaderArgs{'wget'}}; - push @wgetargs, '--no-check-certificate'; + # can't push new arg at end of list because builtin list ends with + # -O to set the output file. + unshift (@wgetargs, '--no-check-certificate'); $TeXLive::TLConfig::FallbackDownloaderArgs{'wget'} = \@wgetargs; debug("TLUtils::setup_programs: wget has ssl, final wget args: @{$TeXLive::TLConfig::FallbackDownloaderArgs{'wget'}}\n"); } else { |