Added regex testing

This commit is contained in:
Bryce Covert
2019-05-09 21:44:54 -07:00
parent 677a4e3c22
commit 0520e2f0f8
4 changed files with 29 additions and 5 deletions

View File

@@ -173,7 +173,7 @@
:field [:bank-account]
:spec ::entity/bank-account}]]
[field "Description"
[field [:span "Description (" [:a {:href "https://regex101.com" :target "_new"} "regex tester"] ")" ]
[:input.input {:type "text"
:field [:description]
:spec ::entity/description}]]

View File

@@ -200,7 +200,10 @@
(.preventDefault e)
(re-frame/dispatch (-> event
(conj field)
(conj (js/parseFloat (.. e -target -value))))))
(conj (let [val (.. e -target -value)]
(if (and val (not (str/blank? val)))
(js/parseFloat val)
val))))))
:value (get-in subscription field)
:class (str class