Added regex testing

2019-05-09 21:44:54 -07:00
parent 677a4e3c22
commit 0520e2f0f8
4 changed files with 29 additions and 5 deletions
--- a/src/cljs/auto_ap/views/utils.cljs
+++ b/src/cljs/auto_ap/views/utils.cljs
@@ -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