Fabio/ddclient
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Whitespace fixes

Browse source
This commit is contained in:
Richard Hansen 2020-06-04 15:22:55 -04:00
parent 9590a85d83
commit 059f8ecbf0
1 changed files with 4 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
ddclient
View file

@ -2006,7 +2006,7 @@ sub geturl {
$url = "/" unless $url =~ m%/%; $url = "/" unless $url =~ m%/%;
$url =~ s%^[^/]*/%%; $url =~ s%^[^/]*/%%;
opt('fw') && debug("opt(fw = ", opt('fw'),")"); opt('fw') && debug("opt(fw = ", opt('fw'), ")");
$globals{'fw'} && debug("glo fw = $globals{'fw'}"); $globals{'fw'} && debug("glo fw = $globals{'fw'}");
## always omit SSL for connections to local router ## 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'} and (caller(1))[3] ne 'main::get_ip')) {
@ -2232,7 +2232,7 @@ sub get_ip {
$queryif =~ s%\/%\\\/%g; $queryif =~ s%\/%\\\/%g;
# Protect special HTML characters (like '?') # Protect special HTML characters (like '?')
$queryif =~ s/([\?&= ])/sprintf("%%%02x",ord($1))/ge; $queryif =~ s/([\?&= ])/sprintf("%%%02x", ord($1))/ge;
$url = "http://" . opt('fw', $h) . "/level/1/exec/show/ip/interface/brief/${queryif}/CR"; $url = "http://" . opt('fw', $h) . "/level/1/exec/show/ip/interface/brief/${queryif}/CR";
$reply = geturl('', $url, opt('fw-login', $h), opt('fw-password', $h)) || ''; $reply = geturl('', $url, opt('fw-login', $h), opt('fw-password', $h)) || '';
@ -2249,7 +2249,7 @@ sub get_ip {
$queryif =~ s%\/%\\\/%g; $queryif =~ s%\/%\\\/%g;
# Protect special HTML characters (like '?') # Protect special HTML characters (like '?')
$queryif =~ s/([\?&= ])/sprintf("%%%02x",ord($1))/ge; $queryif =~ s/([\?&= ])/sprintf("%%%02x", ord($1))/ge;
$url = "https://" . opt('fw', $h) . "/exec/show%20interface%20${queryif}"; $url = "https://" . opt('fw', $h) . "/exec/show%20interface%20${queryif}";
$reply = geturl('', $url, opt('fw-login', $h), opt('fw-password', $h)) || ''; $reply = geturl('', $url, opt('fw-login', $h), opt('fw-password', $h)) || '';
@ -3628,8 +3628,7 @@ sub nic_nfsn_update {
$name = ''; $name = '';
} elsif ($h !~ /$zone$/) { } elsif ($h !~ /$zone$/) {
$config{$h}{'status'} = 'failed'; $config{$h}{'status'} = 'failed';
failed("updating %s: %s is outside zone %s", $h, $h, failed("updating %s: %s is outside zone %s", $h, $h, $zone);
$zone);
next; next;
} else { } else {
$name = $h; $name = $h;