fixed warnings.
This commit is contained in:
@@ -105,7 +105,7 @@
|
||||
|
||||
(re-frame/reg-event-db
|
||||
::attempted-submit
|
||||
(fn [db [_ form & paths]]
|
||||
(fn [db [_ form ]]
|
||||
(assoc-in db [::forms form :attempted-submit?] true)))
|
||||
|
||||
(defn change-handler [form customize-fn]
|
||||
@@ -154,16 +154,17 @@
|
||||
|
||||
(defn triggers-loading [form]
|
||||
(re-frame/enrich
|
||||
(fn [db event]
|
||||
(fn [db _]
|
||||
(loading db form))))
|
||||
|
||||
(defn triggers-stop [form]
|
||||
(re-frame/enrich
|
||||
(fn [db event]
|
||||
(fn [db _]
|
||||
(stop-form db form))))
|
||||
|
||||
(defn triggers-stop-loading [form]
|
||||
(re-frame/enrich
|
||||
(fn [db event]
|
||||
(fn [db _]
|
||||
(assoc-in db [::forms form :status] nil))))
|
||||
|
||||
(defn save-succeeded [db id]
|
||||
|
||||
Reference in New Issue
Block a user