Adds manager type, blocks certain permissions
This commit is contained in:
@@ -160,8 +160,11 @@
|
||||
|
||||
(re-frame/reg-sub
|
||||
::vendors
|
||||
(fn [db]
|
||||
(filter #(not (:hidden %)) (vals (:vendors db)))))
|
||||
:<- [::is-admin?]
|
||||
:<- [::all-vendors]
|
||||
(fn [[is-admin all-vendors]]
|
||||
(filter #(or (not (:hidden %))
|
||||
is-admin) all-vendors)))
|
||||
|
||||
(re-frame/reg-sub
|
||||
::all-vendors
|
||||
|
||||
Reference in New Issue
Block a user