added suggestions

src/cljs/auto_ap/views/utils.cljs

@@ -18,7 +18,6 @@
 
 
 (def date-regex #"[2]{1}[0-9]{3}-[0-9]{1,2}-[0-9]{1,2}")
-(def money-regex #"\-?[0-9]+(\.[0-9]{2})?$")
 
 (def nff
   (NumberFormat. Format/CURRENCY))
@@ -54,9 +53,6 @@
 
     ))
 
-(defn active-when= [active-page candidate]
-  (when (= active-page candidate) " is-active"))
-
 (defn active-when [active-page f & rest]
 
   (when (apply f (into [active-page] rest)) " is-active"))
@@ -72,12 +68,6 @@
     (re-frame/dispatch (conj event (.. e -target -value)))))
 
 
-(defn delayed-dispatch [e]
-  (fn [_]
-    (js/setTimeout #(re-frame/dispatch e) 151)
-    false))
-
-
 (defn dispatch-event [event]
   (fn [e]
     (when (.-stopPropagation e)
@@ -286,9 +276,6 @@
     (js/document.execCommand "copy")
     (.removeChild js/document.body el)))
 
-(defn account->match-text [x]
-  (str (:numeric-code x) " - " (:name x)))
-
 (defn str->int [x]
   (cond
     (nil? x)