account rollout bug fixes.

This commit is contained in:
Bryce Covert
2020-05-05 07:06:10 -07:00
parent 515d15797b
commit 7af6873cfc
3 changed files with 14 additions and 5 deletions

View File

@@ -615,7 +615,7 @@
current-client @(re-frame/subscribe [::subs/client])]
[:div
#_[:h1.title (str (str/capitalize (or status "all")) " invoices")]
(when (= status "unpaid")
(when (= status :unpaid)
[pay-button {:print-checks-shown? print-checks-shown? :checked-invoices checked :print-checks-loading? print-checks-loading?}])
[table/invoice-table {:id :unpaid
:invoice-page (re-frame/subscribe [::invoice-page])
@@ -626,7 +626,7 @@
(re-frame/dispatch [::unvoid-invoice which]))
:on-void-invoice (fn [which]
(re-frame/dispatch [::void-invoice which]))
:check-boxes (= status "unpaid")
:check-boxes (= status :unpaid)
:checked checked
:on-check-changed (fn [which invoice]
(re-frame/dispatch [::toggle-check which invoice]))