a lot of prep for editing customers
This commit is contained in:
@@ -12,7 +12,7 @@
|
||||
::companies
|
||||
(fn [db]
|
||||
(when (:user db)
|
||||
(:companies db))))
|
||||
(vals (:companies db)))))
|
||||
|
||||
(re-frame/reg-sub
|
||||
::menu
|
||||
@@ -27,10 +27,7 @@
|
||||
(re-frame/reg-sub
|
||||
::admin-companies
|
||||
(fn [db]
|
||||
(assoc
|
||||
(:admin-companies db)
|
||||
:selected
|
||||
(first (filter #(= (:id %) (:selected (:admin-companies db))) (:companies db))))))
|
||||
(:admin-companies db)))
|
||||
|
||||
(re-frame/reg-sub
|
||||
::user
|
||||
|
||||
Reference in New Issue
Block a user