fixup! route53: Add support for Amazon AWS Route 53

rename `load_sha1_support` to `load_sha_support`
This commit is contained in:
Richard Hansen 2024-12-19 23:26:35 -05:00
parent fae46498f2
commit 5cdb4ae91f
2 changed files with 4 additions and 7 deletions

View file

@ -2123,8 +2123,8 @@ sub init_config {
# given?
my @protos = map(opt('protocol', $_), keys(%config));
my @needs_sha1 = grep({ my $p = $_; grep($_ eq $p, @protos); } qw(freedns nfsn route53));
load_sha1_support(join(', ', @needs_sha1)) if @needs_sha1;
my @needs_sha = grep({ my $p = $_; grep($_ eq $p, @protos); } qw(freedns nfsn route53));
load_sha_support(join(', ', @needs_sha)) if @needs_sha;
my @needs_json = grep({ my $p = $_; grep($_ eq $p, @protos); }
qw(1984 cloudflare digitalocean directnic dnsexit2 gandi godaddy hetzner
nfsn njalla porkbun yandex));
@ -2706,10 +2706,7 @@ sub check_value {
return $value;
}
######################################################################
## load_sha1_support
######################################################################
sub load_sha1_support {
sub load_sha_support {
my ($protocol) = @_;
eval { require Digest::SHA; } or fatal(<<"EOM");
Error loading the Perl module Digest::SHA needed for $protocol update.

View file

@ -2,7 +2,7 @@ use Test::More;
use ddclient::t;
SKIP: { eval { require Test::Warnings; } or skip($@, 1); }
eval { require 'ddclient'; } or BAIL_OUT($@);
ddclient::load_sha1_support("route53");
ddclient::load_sha_support("route53");
my $TARGET_REQUEST_HASH = "18edc7204269d65bfa6a075381b0496cdb38166dfc3654207e929c6178d1a1ba";