Formatting changes from review comments.

This commit is contained in:
Dimitris Paraskevopoulos 2022-09-22 15:46:29 +03:00
parent 76bfd42871
commit b4a2bbf368

View file

@ -5098,19 +5098,15 @@ sub nic_njalla_update {
my $ip_output = ''; my $ip_output = '';
# Build url # Build url
my $url = "https://$config{$h}{'server'}/update/"; my $url = "https://$config{$h}{'server'}/update/?h=$h&k=$config{$h}{'password'}";
$url .= "?h=";
$url .= $h;
$url .= "&k=";
$url .= $config{$h}{'password'};
my $auto = 1; my $auto = 1;
foreach my $ip ($ipv4, $ipv6) { foreach my $ip ($ipv4, $ipv6) {
next if (!$ip); next if (!$ip);
$auto = 0; $auto = 0;
my $ipv = ($ip eq ($ipv6 // '')) ? '6' : '4'; my $ipv = ($ip eq ($ipv6 // '')) ? '6' : '4';
my $type = ($ip eq ($ipv6 // '')) ? 'aaaa' : 'a'; my $type = ($ip eq ($ipv6 // '')) ? 'aaaa' : 'a';
$ip_output .= ' IP v' . $ipv . ': '. $ip .','; $ip_output .= " IP v$ipv: $ip,";
$url .= '&' . $type . '=' . $ip; $url .= "&$type=$ip";
} }
$url .= (($auto eq 1)) ? '&auto' : ''; $url .= (($auto eq 1)) ? '&auto' : '';
$url .= (($quietreply eq 1)) ? '&quiet' : ''; $url .= (($quietreply eq 1)) ? '&quiet' : '';