diff options
| author | Norbert Preining <preining@logic.at> | 2017-04-20 14:47:49 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2017-04-20 14:47:49 +0000 |
| commit | e016ffde13260cb8ac2b75bca1f3d3bb7e2250f9 (patch) | |
| tree | 5e57d6e46c7ab32d9dcecf89d538307b41f14f56 /Master/install-tl | |
| parent | 41ca4e53eb135aff20a0eba4cffdb2cfb65e10e5 (diff) | |
try to support https, too
git-svn-id: svn://tug.org/texlive/trunk@43940 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl')
| -rwxr-xr-x | Master/install-tl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/install-tl b/Master/install-tl index 575bb5b1cab..63159c30fa5 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -461,7 +461,7 @@ if (!$opt_custom_bin && (platform() eq "i386-cygwin")) { # check command line arguments if given if ($opt_location) { my $tmp = $opt_location; - if ($tmp =~ m!^(http|ftp)://!i) { + if ($tmp =~ m!^(https?|ftp)://!i) { push @media_available, "NET#$tmp"; } elsif ($tmp =~ m!^(rsync|)://!i) { @@ -636,7 +636,7 @@ sub only_load_remote { $location = $opt_location; $location = $selected_location if defined($selected_location); $location || ($location = "$::installerdir"); - if ($location =~ m!^(ctan$|(http|ftp)://)!i) { + if ($location =~ m!^(ctan$|(https?|ftp)://)!i) { $location =~ s,/(tlpkg|archive)?/*$,,; # remove any trailing tlpkg or / if ($location =~ m/^ctan$/i) { $location = TeXLive::TLUtils::give_ctan_mirror(); |