diff options
| author | Martin Whitaker <mageia@martin-whitaker.me.uk> | 2022-11-20 16:13:04 +0000 |
|---|---|---|
| committer | Martin Whitaker <mageia@martin-whitaker.me.uk> | 2022-11-20 16:13:04 +0000 |
| commit | 84ed108af4500508b3007b51cd31b520e2c39545 (patch) | |
| tree | 55ac697d148c5ec72f8dcca84bd9fa1de091f6bf /perl-install/any.pm | |
| parent | bc411c16e8fb6945709b88f5fe6a0325d44fe869 (diff) | |
| download | drakx-84ed108af4500508b3007b51cd31b520e2c39545.tar drakx-84ed108af4500508b3007b51cd31b520e2c39545.tar.gz drakx-84ed108af4500508b3007b51cd31b520e2c39545.tar.bz2 drakx-84ed108af4500508b3007b51cd31b520e2c39545.tar.xz drakx-84ed108af4500508b3007b51cd31b520e2c39545.zip | |
Allow https when user provides an explicit mirror URL.
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index a9f50af4f..d09bc323b 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -1874,10 +1874,10 @@ sub ask_url { $in->ask_from_({ messages => N("URL of the mirror?"), focus_first => 1 }, [ { val => \$url, validate => sub { - if ($url =~ m!^(http|ftp)://!) { + if ($url =~ m!^(https?|ftp)://!) { 1; } else { - $in->ask_warn('', N("URL must start with ftp:// or http://")); + $in->ask_warn('', N("URL must start with ftp:// or http:// or https://")); 0; } } } ]) && $url; |