removed redundant stuff.

This commit is contained in:
2022-07-22 22:55:26 -07:00
parent 7f5a2ea353
commit 005bfe2603
21 changed files with 357 additions and 399 deletions

View File

@@ -100,12 +100,6 @@
(re-frame/reg-event-db
::check-problems
(fn [db [_ form schema]]
(println "Checking problems"
form
(get-in db [::forms form :data])
(keys (get-in db [::forms]))
schema
(m/explain schema (get-in db [::forms form :data])))
(assoc-in db [::forms form :problems]
(when schema (m/explain schema (get-in db [::forms form :data]))))))