Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-08 16:00:19 -05:00
Code Issues Activity

🐛 Fix conform function on uxbox.common.spec.

Browse source
This commit is contained in:
Andrey Antukh 2020-01-11 21:11:18 +01:00
parent 74f1f93732
commit 1cc64ae4d2
1 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
common/uxbox/common/spec.cljc
View file

@ -126,9 +126,10 @@
[spec data]
(let [result (s/conform spec data)]
(when (= result ::s/invalid)
(throw (ex/error :type :validation
:code :spec-validation
:explain (with-out-str
(expound/printer data))
:data (::s/problems data))))
(let [edata (s/explain-data spec data)]
(throw (ex/error :type :validation
:code :spec-validation
:explain (with-out-str
(expound/printer edata))
:data (::s/problems edata)))))
result))