dnsmadeeasy: Whitespace fixes
This commit is contained in:
parent
07800a4586
commit
c79d12263e
1 changed files with 0 additions and 5 deletions
|
@ -6576,7 +6576,6 @@ EoEXAMPLE
|
||||||
######################################################################
|
######################################################################
|
||||||
sub nic_dnsmadeeasy_update {
|
sub nic_dnsmadeeasy_update {
|
||||||
debug("\nnic_dnsmadeeasy_update -------------------");
|
debug("\nnic_dnsmadeeasy_update -------------------");
|
||||||
|
|
||||||
my %messages = (
|
my %messages = (
|
||||||
'error-auth' => 'Invalid username or password, or invalid IP syntax',
|
'error-auth' => 'Invalid username or password, or invalid IP syntax',
|
||||||
'error-auth-suspend' => 'User has had their account suspended due to complaints or misuse of the service.',
|
'error-auth-suspend' => 'User has had their account suspended due to complaints or misuse of the service.',
|
||||||
|
@ -6588,7 +6587,6 @@ sub nic_dnsmadeeasy_update {
|
||||||
'error' => 'General system error unrecognized by the system.',
|
'error' => 'General system error unrecognized by the system.',
|
||||||
'success' => 'Record successfully updated!',
|
'success' => 'Record successfully updated!',
|
||||||
);
|
);
|
||||||
|
|
||||||
for my $h (@_) {
|
for my $h (@_) {
|
||||||
my $ip = delete $config{$h}{'wantip'};
|
my $ip = delete $config{$h}{'wantip'};
|
||||||
info("Setting IP address to %s for %s", $ip, $h);
|
info("Setting IP address to %s for %s", $ip, $h);
|
||||||
|
@ -6598,15 +6596,12 @@ sub nic_dnsmadeeasy_update {
|
||||||
$url .= "&password=$config{$h}{'password'}";
|
$url .= "&password=$config{$h}{'password'}";
|
||||||
$url .= "&ip=$ip";
|
$url .= "&ip=$ip";
|
||||||
$url .= "&id=$h";
|
$url .= "&id=$h";
|
||||||
|
|
||||||
my $reply = geturl(proxy => opt('proxy'), url => $url);
|
my $reply = geturl(proxy => opt('proxy'), url => $url);
|
||||||
|
|
||||||
if (!defined($reply) || !$reply) {
|
if (!defined($reply) || !$reply) {
|
||||||
failed("Updating %s: Could not connect to %s.", $h, $config{$h}{'server'});
|
failed("Updating %s: Could not connect to %s.", $h, $config{$h}{'server'});
|
||||||
next;
|
next;
|
||||||
}
|
}
|
||||||
next if !header_ok($h, $reply);
|
next if !header_ok($h, $reply);
|
||||||
|
|
||||||
my @reply = split /\n/, $reply;
|
my @reply = split /\n/, $reply;
|
||||||
my $returned = pop(@reply);
|
my $returned = pop(@reply);
|
||||||
if ($returned =~ 'success') {
|
if ($returned =~ 'success') {
|
||||||
|
|
Loading…
Reference in a new issue