adding and removing transaction rules works.

This commit is contained in:
Bryce Covert
2019-05-09 10:21:59 -07:00
parent 8c50085fcc
commit 753949e063
4 changed files with 45 additions and 13 deletions

View File

@@ -27,22 +27,35 @@
(fn [db]
(-> db (::params {}))))
;; EVENTS
(defn ungraphql-transaction-rule [x]
(-> x
(update :amount-lte #(some-> % js/parseFloat))
(update :amount-gte #(some-> % js/parseFloat))))
(re-frame/reg-event-db
::edit-completed
(fn [db [_ edit-transaction-rule]]
(println edit-transaction-rule)
(-> db
(update-in [::page :transaction-rules]
replace-by :id (assoc edit-transaction-rule :class "live-added")))))
replace-by :id
(-> edit-transaction-rule
ungraphql-transaction-rule
(assoc :class "live-added"))))))
;; EVENTS
(re-frame/reg-event-db
::received
(fn [db [_ data]]
(println data)
(-> db
(update ::page merge (:transaction-rule-page data))
(update ::page merge
(-> data
:transaction-rule-page
(update :transaction-rules (fn [rules]
(mapv ungraphql-transaction-rule rules)))))
(assoc-in [:status :loading] false))))
(re-frame/reg-event-fx