Started adding admin page

2018-04-03 19:27:34 -07:00
parent b810deb609
commit ff7cc1d024
7 changed files with 162 additions and 8 deletions
--- a/src/cljs/auto_ap/events.cljs
+++ b/src/cljs/auto_ap/events.cljs
@@ -41,6 +41,11 @@
 (fn  [db [_ companies]]
   (assoc db :companies companies)))

+(re-frame/reg-event-db
+ ::select-company
+ (fn  [db [_ company]]
+   (assoc-in db [:admin-companies :selected] company)))
+
 (re-frame/reg-event-db
 ::swap-company
 (fn  [db [_ company]]