(cloud) fixes build
This commit is contained in:
@@ -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))))))))
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user