showing matched rule.

2019-05-16 08:34:12 -07:00
parent ac5ffd26fe
commit 8845ec9688
7 changed files with 37 additions and 17 deletions
--- a/src/cljs/auto_ap/subs.cljs
+++ b/src/cljs/auto_ap/subs.cljs
@@ -151,6 +151,12 @@
              false
              %))))

+(re-frame/reg-sub
+ ::is-admin?
+ :<- [::user]
+ (fn [user]
+   (= "admin" (:user/role user))))
+
 (re-frame/reg-sub
 ::user
 (fn [db]