tons of bug fixes.
This commit is contained in:
@@ -246,6 +246,8 @@
|
||||
|
||||
(defonce in-memory-cache (atom []))
|
||||
|
||||
(defonce break? (atom false))
|
||||
|
||||
(defn load-in-memory-cache []
|
||||
(future
|
||||
(loop []
|
||||
@@ -253,8 +255,9 @@
|
||||
(reset! in-memory-cache (get-provider-accounts-with-accounts))
|
||||
(catch Exception e
|
||||
(println e)))
|
||||
(Thread/sleep (* 60 * 1000 * 5))
|
||||
(recur))))
|
||||
(Thread/sleep (* 30 1000 5))
|
||||
(when-not @break?
|
||||
(recur)))))
|
||||
|
||||
(defn refresh-provider-account [id]
|
||||
(swap! in-memory-cache
|
||||
|
||||
Reference in New Issue
Block a user