porkbun: Check for JSON object, not just non-null

2024-07-23 02:00:51 -04:00 · 2024-07-23 02:00:51 -04:00 · fc453a0de3
commit fc453a0de3
parent 536c7c87a2
1 changed files with 1 additions and 1 deletions
--- a/ddclient.in
+++ b/ddclient.in
@ -6810,7 +6810,7 @@ sub nic_porkbun_update {
            (my $body = $reply) =~ s/^.*?\n\n//s;
            $body =~ qr/{(?:[^{}]*|(?R))*}/mp;
            my $response = eval { decode_json(${^MATCH}) };
-            if (!defined($response)) {
+            if (ref($response) ne 'HASH') {
                failed("$h: unexpected service response: $body");
                next;
            }