better warning behavior.A

src/cljs/auto_ap/forms.cljs

@@ -1,5 +1,6 @@
 (ns auto-ap.forms
   (:require [re-frame.core :as re-frame]
+            [re-frame.interceptor :as i]
             [auto-ap.views.utils :refer [dispatch-event bind-field]]))
 
 
@@ -89,6 +90,17 @@
       (assoc-in [::forms id :status] :loading)
       (assoc-in [::forms id :error] nil)))
 
+(defn settles [{:keys [event time key]}]
+  (i/->interceptor
+   :id :settles
+   :befor (fn [context]
+            (println "here2")
+            context)
+   :after (fn [context]
+            (i/assoc-effect context :dispatch-debounce {:event event
+                                                        :time time
+                                                        :key key}))))
+
 (defn triggers-loading [form]
   (re-frame/enrich
    (fn [db event]