Removes old login page, more progress on transactions
This commit is contained in:
@@ -7,7 +7,7 @@
|
||||
check-vendor-default-account
|
||||
clientize-vendor get-vendor
|
||||
location-select*
|
||||
match-autopay-invoices match-payment
|
||||
match-autopay-invoices link-payment
|
||||
match-unpaid-invoices
|
||||
transaction-account-row*
|
||||
unlink-payment]]
|
||||
@@ -87,7 +87,7 @@
|
||||
:transaction/amount 50.0
|
||||
:transaction/client {:db/id "client-id"}}])
|
||||
;; Perform match-payment
|
||||
(match-payment {:form-params {"transaction-id" "transaction-id" "payment-id" "payment-id"}})
|
||||
(link-payment {:form-params {"transaction-id" "transaction-id" "payment-id" "payment-id"}})
|
||||
;; Verify payment and transaction are linked
|
||||
(let [transaction (d-transactions/get-by-id "transaction-id")
|
||||
payment (dc/pull (dc/db conn) '[:db/id :payment/status] "payment-id")]
|
||||
|
||||
Reference in New Issue
Block a user