Made all interactions much better

This commit is contained in:
Bryce Covert
2020-08-17 19:43:31 -07:00
parent dbb671b5d9
commit 6a8bb77e95
10 changed files with 234 additions and 284 deletions

View File

@@ -31,20 +31,25 @@
(defmulti page (fn [active-page] active-page))
(defmethod page :unpaid-invoices [_]
(unpaid-invoices-page {:status "unpaid"}))
^{:key :voided}
[unpaid-invoices-page {:status :unpaid}])
(defmethod page :import-invoices [_]
(import-invoices-page ))
(defmethod page :paid-invoices [_]
(unpaid-invoices-page {:status "paid"}))
^{:key :voided}
[unpaid-invoices-page {:status :paid}]
)
(defmethod page :voided-invoices [_]
(unpaid-invoices-page {:status "voided"}))
^{:key :voided}
[unpaid-invoices-page {:status :voided}])
(defmethod page :invoices [_]
(unpaid-invoices-page {}))
^{:key :all}
[unpaid-invoices-page {}])
(defmethod page :payments [_]
[payments-page])