From d10f104ba3b706d8db6647bb2c8c0a505ac527f5 Mon Sep 17 00:00:00 2001 From: Bryce Date: Mon, 21 Oct 2024 16:29:06 -0700 Subject: [PATCH] another fix. --- src/clj/auto_ap/ssr/ledger.clj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/clj/auto_ap/ssr/ledger.clj b/src/clj/auto_ap/ssr/ledger.clj index fd513805..9645ae66 100644 --- a/src/clj/auto_ap/ssr/ledger.clj +++ b/src/clj/auto_ap/ssr/ledger.clj @@ -374,7 +374,7 @@ :vendor-name vendor-name :amount (reduce + 0 (->> lines - (map :debit))) + (map #(or (:debit %) 0.0)))) :line-items (map (fn [{:keys [debit credit account-code location index]}] {:account-code account-code :index index