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

should handle case of no payouts.

Browse Source
This commit is contained in:
Bryce
2023-07-26 11:39:19 -07:00
parent 90014fbfcd
commit a2320cec80
1 changed files with 21 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/clj/auto_ap/square/core3.clj
View File

@@ -430,6 +430,7 @@
:body :body
:payouts :payouts
(fn [payouts] (fn [payouts]
(if (seq payouts)
(->> payouts (->> payouts
(s/->source) (s/->source)
(s/map (fn [payout] (s/map (fn [payout]
@@ -448,7 +449,8 @@
(assoc payout :payout_entries b)))))) (assoc payout :payout_entries b))))))
(s/buffer 10) (s/buffer 10)
(s/realize-each) (s/realize-each)
(s/reduce conj []))))))) (s/reduce conj []))
[]))))))
(defn transformed-payouts (defn transformed-payouts
([client location] ([client location]