status-im
/
re-natal
mirror of https://github.com/status-im/re-natal.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

make spec check message more clear

This commit is contained in:
Artur Girenko 2016-10-31 18:44:24 +01:00
parent 42f0ad0df9
commit aa6e476c03
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
resources/cljs-reagent6/events.cljs
View File

@ -10,10 +10,10 @@
;;
(defn check-and-throw
"Throw an exception if db doesn't have a valid spec."
[spec db [msg]]
[spec db [event]]
(when-not (s/valid? spec db)
(let [explain-data (s/explain-data spec db)]
(throw (ex-info (str "Spec check " msg " failed: " explain-data) explain-data)))))
(throw (ex-info (str "Spec check after " event " failed: " explain-data) explain-data)))))
(def validate-spec
(if goog.DEBUG