Decode server summary before returning

abeverley · abeverley · commit 51a894413b99 · 2025-01-04T09:27:40.000Z
diff --git a/lib/Brass/ConfigDB.pm b/lib/Brass/ConfigDB.pm
@@ -149,7 +149,7 @@ sub run
 
     my $decoded = decode_json $response->decoded_content;
     error $decoded->{message} if $decoded->{is_error};
-    if ($action eq 'metadata') # double-encoded
+    if ($action eq 'metadata' || $action eq 'summary') # double-encoded
     {
         return undef if !$decoded->{result}; # No metadata
         return decode_json $decoded->{result};

Original file line number	Diff line number	Diff line change
`@@ -149,7 +149,7 @@ sub run`
`149`	`149`
`150`	`150`	`my $decoded = decode_json $response->decoded_content;`
`151`	`151`	`error $decoded->{message} if $decoded->{is_error};`
`152`		`- if ($action eq 'metadata') # double-encoded`
	`152`	`+ if ($action eq 'metadata' \|\| $action eq 'summary') # double-encoded`
`153`	`153`	`{`
`154`	`154`	`return undef if !$decoded->{result}; # No metadata`
`155`	`155`	`return decode_json $decoded->{result};`