}
my $res = $tx->res;
my $json = eval { $res->json };
if (not defined $json) {
$c->app->log->error( 'Decoding JSON response failed: ' . $@ );
$c->app->
rn $p->reject( 'x-unparseable-data-received' );
}
if (not $json->{'success'}) {
return $p->reject( @{ $json->{'error-codes'} // [] } );
}
return $p->resolve;
});