From afc8d2f3639925b680786c24f373c97e610b2c1a Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Sun, 27 Mar 2022 20:35:54 -0700 Subject: [PATCH] more detail when it fails. --- src/clj/auto_ap/ledger.clj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/clj/auto_ap/ledger.clj b/src/clj/auto_ap/ledger.clj index b0417125..bb4f6fd4 100644 --- a/src/clj/auto_ap/ledger.clj +++ b/src/clj/auto_ap/ledger.clj @@ -391,7 +391,7 @@ (let [unbalanced-ts (unbalanced-transactions)] (if (seq unbalanced-ts) (do - (log/warn (count unbalanced-ts) " transactions exist but don't have matching debits/credits ") + (log/warn (count unbalanced-ts) " transactions exist but don't have matching debits/credits (" (pr-str (take 3 unbalanced-ts) ")")) (doseq [m unbalanced-ts] (touch-transaction m)) (statsd/gauge "data.unbalanced_transactions" (count (unbalanced-transactions))))