Started adding admin page

This commit is contained in:
Bryce Covert
2018-04-03 19:27:34 -07:00
parent b810deb609
commit ff7cc1d024
7 changed files with 162 additions and 8 deletions

View File

@@ -6,6 +6,8 @@
[auto-ap.events :as events]
[auto-ap.views.pages.login :refer [login-page]]
[auto-ap.views.pages.index :refer [index-page]]
[auto-ap.views.pages.admin :refer [admin-page]]
[auto-ap.views.pages.admin.companies :refer [admin-companies-page]]
[auto-ap.views.pages.unpaid-invoices :refer [unpaid-invoices-page]]
[auto-ap.views.pages.new-invoice :refer [new-invoice-page]]
[auto-ap.views.pages.import-invoices :refer [import-invoices-page]]
@@ -18,7 +20,6 @@
[cljs.core.async :refer [<!]]))
(defmulti active-page identity)
(defmethod active-page :login []
@@ -27,6 +28,12 @@
(defmethod active-page :index []
index-page)
(defmethod active-page :admin []
[admin-page])
(defmethod active-page :admin-companies []
[admin-companies-page])
(defmethod active-page :unpaid-invoices []
[unpaid-invoices-page])
@@ -48,9 +55,3 @@
(defmethod active-page :new-invoice [] new-invoice-page)