Last staging changes before proceeding
This commit is contained in:
@@ -90,6 +90,7 @@
|
||||
[])))
|
||||
|
||||
(defn get-provider-accounts [client-code ]
|
||||
(log/info "logging in user " client-code)
|
||||
(let [cob-session (login-user client-code)]
|
||||
(-> (str (:yodlee2-base-url env) "/providerAccounts")
|
||||
(-> (client/get (merge {:headers (merge base-headers {"Authorization" (auth-header cob-session )})
|
||||
@@ -274,7 +275,7 @@
|
||||
|
||||
(defn upsert-accounts-tx
|
||||
([client-code]
|
||||
(upsert-accounts-tx (get-provider-accounts (client-code->login client-code))))
|
||||
(upsert-accounts-tx client-code (get-provider-accounts (client-code->login client-code))))
|
||||
([client-code provider-accounts]
|
||||
(let [accounts (get-accounts-for-providers (client-code->login client-code) (map :id provider-accounts))]
|
||||
(map (fn [pa]
|
||||
|
||||
Reference in New Issue
Block a user