luciano/reitit
1
0
Fork 0
mirror of https://github.com/metosin/reitit.git synced 2025-12-23 10:41:10 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Properly access ::s/problems key in coercion-spec

Browse source
This commit is contained in:
Kevin van Rooijen 2019-05-20 17:30:17 +02:00
parent 542e11bd95
commit a9cacd78ce
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
modules/reitit-spec/src/reitit/coercion/spec.cljc
View file

@ -110,7 +110,7 @@
(into-spec model name)) (into-spec model name))
(-open-model [_ spec] spec) (-open-model [_ spec] spec)
(-encode-error [_ error] (-encode-error [_ error]
(let [problems (::s/problems error)] (let [problems (-> error :problems ::s/problems)]
(-> error (-> error
(update :spec (comp str s/form)) (update :spec (comp str s/form))
(assoc :problems (mapv #(update % :pred stringify-pred) problems))))) (assoc :problems (mapv #(update % :pred stringify-pred) problems)))))