bugfix
This commit is contained in:
@@ -5,11 +5,11 @@ use warnings;
|
|||||||
use Martnet::DDNS;
|
use Martnet::DDNS;
|
||||||
use Regexp::Common qw/net/;
|
use Regexp::Common qw/net/;
|
||||||
use Getopt::Long qw/GetOptions/;
|
use Getopt::Long qw/GetOptions/;
|
||||||
use JSON::PP qw/encode_json true false/;
|
use JSON::PP qw/encode_json/;
|
||||||
|
|
||||||
sub usage {
|
sub usage {
|
||||||
die "Usage: add-custom [--edit] [--enable-dnssec|--disable-dnssec] --master <IPv4|IPv6> " +
|
die "Usage: add-custom [--edit] [--enable-dnssec|--disable-dnssec] --master <IPv4|IPv6> " .
|
||||||
("") +
|
("") .
|
||||||
"[--ddns-keyname <keyname> ...] <zone.>\n";
|
"[--ddns-keyname <keyname> ...] <zone.>\n";
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -46,9 +46,9 @@ die "Master must be an IPv4 or IPv6 address\n"
|
|||||||
|
|
||||||
my $payload = { master => $master };
|
my $payload = { master => $master };
|
||||||
if ($enable_dnssec) {
|
if ($enable_dnssec) {
|
||||||
$payload->{dnssec} = true;
|
$payload->{dnssec} = JSON::PP::true();
|
||||||
} elsif ($disable_dnssec) {
|
} elsif ($disable_dnssec) {
|
||||||
$payload->{dnssec} = false;
|
$payload->{dnssec} = JSON::PP::false();
|
||||||
}
|
}
|
||||||
|
|
||||||
if (@ddns_keynames) {
|
if (@ddns_keynames) {
|
||||||
|
|||||||
Reference in New Issue
Block a user