hopefully fixes check issue.
This commit is contained in:
@@ -217,7 +217,7 @@
|
||||
:input-stream (io/make-input-stream (.toByteArray merged-pdf-stream) {})
|
||||
:metadata {:content-length (count (.toByteArray merged-pdf-stream))
|
||||
:content-type "application/pdf"})
|
||||
(str "http://" (:data-bucket env) ".s3-website-us-east-1.amazonaws.com/merged-checks/" uuid ".pdf")))
|
||||
(str "https://" (:data-bucket env) "/merged-checks/" uuid ".pdf")))
|
||||
|
||||
#_{:clj-kondo/ignore [:unused-binding]}
|
||||
(defmulti invoices->entities (fn [invoices vendor-id client bank-account type index invoice-amounts]
|
||||
@@ -261,7 +261,7 @@
|
||||
(assoc base-payment
|
||||
:payment/s3-uuid (when (> (:payment/amount base-payment) 0) uuid)
|
||||
:payment/s3-key (when (> (:payment/amount base-payment) 0) (str "checks/" uuid ".pdf"))
|
||||
:payment/s3-url (when (> (:payment/amount base-payment) 0) (str "http://" (:data-bucket env) ".s3-website-us-east-1.amazonaws.com/checks/" uuid ".pdf"))
|
||||
:payment/s3-url (when (> (:payment/amount base-payment) 0) (str "https://" (:data-bucket env) "/checks/" uuid ".pdf"))
|
||||
:payment/check-number (+ index (:bank-account/check-number bank-account))
|
||||
:payment/type :payment-type/check
|
||||
:payment/memo memo
|
||||
|
||||
Reference in New Issue
Block a user