Makes transaction rule form much better; state visible
This commit is contained in:
@@ -361,3 +361,13 @@
|
||||
(assoc result (keyword k) (cljs.tools.reader.edn/read-string v)))
|
||||
{}
|
||||
(:query (cemerick.url/url (.-location js/window)))))
|
||||
|
||||
(defn loading [db]
|
||||
(-> db
|
||||
(assoc-in [:status] :loading)
|
||||
(assoc-in [:error] nil)))
|
||||
|
||||
(defn triggers-loading [form]
|
||||
(re-frame/enrich
|
||||
(fn [db event]
|
||||
(loading db))))
|
||||
|
||||
Reference in New Issue
Block a user