removed the cruft.
This commit is contained in:
@@ -18,16 +18,9 @@
|
||||
[auto-ap.views.pages.ledger.profit-and-loss-detail :refer [profit-and-loss-detail-page]]
|
||||
[auto-ap.views.pages.login :refer [login-page]]
|
||||
[auto-ap.views.pages.payments :refer [payments-page]]
|
||||
[auto-ap.views.pages.pos.sales-orders :refer [sales-orders-page]]
|
||||
[auto-ap.views.pages.pos.expected-deposits :refer [expected-deposits-page]]
|
||||
[auto-ap.views.pages.admin :refer [admin-page]]
|
||||
[auto-ap.views.pages.home :refer [home-page]]
|
||||
[auto-ap.views.pages.admin.clients :refer [admin-clients-page]]
|
||||
[auto-ap.views.pages.admin.rules :refer [admin-rules-page]]
|
||||
[auto-ap.views.pages.admin.vendors :refer [admin-vendors-page]]
|
||||
[auto-ap.views.pages.admin.excel-import :refer [admin-excel-import-page]]
|
||||
[auto-ap.views.pages.admin.import-batches :refer [import-batches-page]]
|
||||
[auto-ap.views.pages.company.other :as company-other]))
|
||||
[auto-ap.views.pages.admin.vendors :refer [admin-vendors-page]]))
|
||||
|
||||
(defmulti page (fn [active-page] active-page))
|
||||
(defmethod page :unpaid-invoices [_]
|
||||
@@ -55,12 +48,6 @@
|
||||
(defmethod page :payments [_]
|
||||
[payments-page])
|
||||
|
||||
(defmethod page :sales-orders [_]
|
||||
[sales-orders-page])
|
||||
|
||||
(defmethod page :expected-deposits [_]
|
||||
[expected-deposits-page])
|
||||
|
||||
(defmethod page :transactions [_]
|
||||
(transactions-page {}))
|
||||
|
||||
@@ -92,31 +79,17 @@
|
||||
(defmethod page :balance-sheet [_]
|
||||
(balance-sheet-page))
|
||||
|
||||
(defmethod page :admin [_]
|
||||
(admin-page))
|
||||
|
||||
(defmethod page :admin-clients [_]
|
||||
(admin-clients-page))
|
||||
|
||||
(defmethod page :admin-specific-client [_]
|
||||
(admin-clients-page))
|
||||
|
||||
|
||||
(defmethod page :admin-rules [_]
|
||||
(admin-rules-page))
|
||||
|
||||
(defmethod page :admin-vendors [_]
|
||||
(admin-vendors-page))
|
||||
|
||||
(defmethod page :admin-import-batches [_]
|
||||
[import-batches-page])
|
||||
|
||||
(defmethod page :company-other [_]
|
||||
(company-other/company-other-page))
|
||||
|
||||
(defmethod page :index [_]
|
||||
(home-page)
|
||||
)
|
||||
(home-page))
|
||||
|
||||
(defmethod page :login [_]
|
||||
[login-page])
|
||||
@@ -130,10 +103,6 @@
|
||||
(defmethod page :external-ledger [_]
|
||||
[external-ledger-page])
|
||||
|
||||
(defmethod page :admin-excel-import [_]
|
||||
[admin-excel-import-page])
|
||||
|
||||
|
||||
(defmethod page :initial-error [_]
|
||||
[error-page])
|
||||
|
||||
|
||||
Reference in New Issue
Block a user