diff --git a/src/clj/auto_ap/ledger.clj b/src/clj/auto_ap/ledger.clj
index 4ea60b2c..9d330f2d 100644
--- a/src/clj/auto_ap/ledger.clj
+++ b/src/clj/auto_ap/ledger.clj
@@ -677,7 +677,7 @@
                  (:dirty-entries account-needing-refresh)))))
 
 
-(defn refresh-running-balance-accounts [accounts-needing-rebuild clients i db]
+(defn refresh-running-balance-accounts [accounts-needing-rebuild clients c i db]
   (mu/log ::found-accounts-needing-rebuild
           :accounts (count accounts-needing-rebuild))
   (let [so-far (atom 0)]
@@ -727,7 +727,7 @@
          (let [db                       (dc/db conn)
                accounts-needing-rebuild (accounts-needing-rebuild db (:db/id c))]
            (when (seq accounts-needing-rebuild)
-             (refresh-running-balance-accounts accounts-needing-rebuild clients i db)
+             (refresh-running-balance-accounts accounts-needing-rebuild clients c i db)
              (mu/log ::client-completed))))))))
 
 (defn rebuild-running-balance-cache
@@ -746,7 +746,7 @@
          (let [db                       (dc/db conn)
                accounts-needing-rebuild (all-accounts-needing-rebuild db (:db/id c))]
            (when (seq accounts-needing-rebuild)
-             (refresh-running-balance-accounts accounts-needing-rebuild clients i db)
+             (refresh-running-balance-accounts accounts-needing-rebuild clients c i db)
              (mu/log ::client-completed))))))))