user progress

2022-07-22 09:44:19 -07:00
parent 3c11891c45
commit 7f5a2ea353
10 changed files with 233 additions and 208 deletions
--- a/src/cljs/auto_ap/views/utils.cljs
+++ b/src/cljs/auto_ap/views/utils.cljs
@@ -622,3 +622,17 @@
                          second
                          base64/decodeString)]
    (js->clj (.parse js/JSON json) :keywordize-keys true)))
+
+(defn coerce-float [f]
+  (cond (str/blank?  f)
+        nil
+
+        (float? f)
+        f
+
+        (and (string? f)
+             (not (js/Number.isNaN (js/parseFloat f))))
+        (js/parseFloat f)
+
+        :else
+        nil))