before method evaluation (like during checking of Bugzilla_login and
Bugzilla_password)
r=dkl, a=mkanat
message => $message,
id => $server->{_bz_request_id},
version => $server->version);
- # We die with no message. JSON::RPC checks raise_error before
+ # Most JSON-RPC Throw*Error calls happen within an eval inside
+ # of JSON::RPC. So, in that circumstance, instead of exiting,
+ # we die with no message. JSON::RPC checks raise_error before
# it checks $@, so it returns the proper error.
- die;
+ die if _in_eval();
+ $server->response($server->error_response_header);
}
}
}