fix.
This commit is contained in:
@@ -115,8 +115,9 @@
|
|||||||
|
|
||||||
(defn do-import []
|
(defn do-import []
|
||||||
(let [transactions (client/get-transactions)
|
(let [transactions (client/get-transactions)
|
||||||
|
_ (println "Total transactions" (count transactions))
|
||||||
_ (println "Count of transactions" (->> transactions
|
_ (println "Count of transactions" (->> transactions
|
||||||
(group-by transactions :accountId)
|
(group-by :accountId)
|
||||||
(reduce-kv (fn [acc k v]
|
(reduce-kv (fn [acc k v]
|
||||||
(assoc acc k (count v)))
|
(assoc acc k (count v)))
|
||||||
{})))
|
{})))
|
||||||
|
|||||||
Reference in New Issue
Block a user