makes it look like you can add a new invoice.
This commit is contained in:
@@ -66,12 +66,17 @@
|
||||
(re-frame/reg-event-db
|
||||
::swap-company
|
||||
(fn [db [_ company]]
|
||||
(println company)
|
||||
(assoc db :company (:id company))))
|
||||
|
||||
(re-frame/reg-event-db
|
||||
::change-form
|
||||
(fn [db [_ location field value]]
|
||||
(assoc-in db (into location field) value)))
|
||||
|
||||
(re-frame/reg-event-db
|
||||
::modal-status
|
||||
(fn [db [_ id state]]
|
||||
(println "changing modal status" id "to")
|
||||
(update-in db [:modal-state id] #(merge % state))))
|
||||
|
||||
(re-frame/reg-event-db
|
||||
|
||||
Reference in New Issue
Block a user