Silence warning when calling geturl from an anonymous sub

This commit is contained in:
Richard Hansen 2020-07-05 16:11:31 -04:00
parent 91803cbb41
commit 49c8717420

View file

@ -2007,7 +2007,7 @@ sub geturl {
opt('fw') && debug("opt(fw = %s)", opt('fw'));
$globals{'fw'} && debug("glo fw = %s", $globals{'fw'});
## always omit SSL for connections to local router
if ($force_ssl || ($globals{'ssl'} and (caller(1))[3] ne 'main::get_ip')) {
if ($force_ssl || ($globals{'ssl'} && ((caller(1))[3] // '') ne 'main::get_ip')) {
$use_ssl = 1;
$default_port = '443';
} else {