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))))