should handle case of no payouts.

2023-07-26 11:39:19 -07:00
parent 90014fbfcd
commit a2320cec80
1 changed files with 21 additions and 19 deletions
--- a/src/clj/auto_ap/square/core3.clj
+++ b/src/clj/auto_ap/square/core3.clj
@@ -430,6 +430,7 @@
                :body
                :payouts
                (fn [payouts]
+                  (if (seq payouts)
                    (->> payouts
                         (s/->source)
                         (s/map (fn [payout]
@@ -448,7 +449,8 @@
                                        (assoc payout :payout_entries b))))))
                         (s/buffer 10)
                         (s/realize-each)
-                       (s/reduce conj [])))))))
+                         (s/reduce conj []))
+                    []))))))

 (defn transformed-payouts
  ([client location]