notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

all kinds of linkability.

Browse Source
This commit is contained in:
Bryce Covert
2021-01-26 12:37:40 -08:00
parent 7eeb1737ab
commit 74936001ba
5 changed files with 67 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
src/cljs/auto_ap/views/main.cljs
View File

@@ -7,7 +7,7 @@
[auto-ap.events :as events]
[auto-ap.views.utils :refer [active-when active-when= login-url dispatch-event]]
[auto-ap.views.components.layouts :refer [side-bar-layout loading-layout]]
[auto-ap.views.pages.unpaid-invoices :refer [unpaid-invoices-page]]
[auto-ap.views.pages.unpaid-invoices :refer [unpaid-invoices-page paid-invoices-page all-invoices-page voided-invoices-page]]
[auto-ap.views.pages.import-invoices :refer [import-invoices-page]]
[auto-ap.views.pages.needs-activation :refer [needs-activation-page]]
[auto-ap.views.pages.transactions :refer [transactions-page]]
@@ -34,7 +34,7 @@
(defmulti page (fn [active-page] active-page))
(defmethod page :unpaid-invoices [_]
^{:key :voided}
^{:key :unpaid}
[unpaid-invoices-page {:status :unpaid}])
(defmethod page :import-invoices [_]
@@ -42,17 +42,16 @@
(defmethod page :paid-invoices [_]
^{:key :voided}
[unpaid-invoices-page {:status :paid}]
)
^{:key :paid}
[paid-invoices-page {:status :paid}])
(defmethod page :voided-invoices [_]
^{:key :voided}
[unpaid-invoices-page {:status :voided}])
[voided-invoices-page {:status :voided}])
(defmethod page :invoices [_]
^{:key :all}
[unpaid-invoices-page {}])
[all-invoices-page {}])
(defmethod page :payments [_]
[payments-page])