update clj-http request error handling
the exceptions it throws in the case of an error are now somewhat different in the latest versions
This commit is contained in:
parent
4ed1dff618
commit
14a813b70c
|
@ -85,7 +85,7 @@
|
||||||
(json/parse-string response-body true)
|
(json/parse-string response-body true)
|
||||||
response-body)))
|
response-body)))
|
||||||
(catch ExceptionInfo ex
|
(catch ExceptionInfo ex
|
||||||
(let [{:keys [status body] :as response} (:object (ex-data ex))
|
(let [{:keys [status body] :as response} (ex-data ex)
|
||||||
fhir-resource-response? (fhir-response? response)]
|
fhir-resource-response? (fhir-response? response)]
|
||||||
(throw (ex-info (str "FHIR request failed: HTTP " status)
|
(throw (ex-info (str "FHIR request failed: HTTP " status)
|
||||||
{:status status
|
{:status status
|
||||||
|
|
Reference in a new issue