From 49373bb9aa45455bd1db7ee122fb5ea32609154c Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Mon, 30 Jul 2018 17:58:24 -0700 Subject: [PATCH] more debugging info. --- src/clj/auto_ap/routes/checks.clj | 2 +- src/clj/auto_ap/yodlee/import.clj | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/src/clj/auto_ap/routes/checks.clj b/src/clj/auto_ap/routes/checks.clj index 7af4ac0f..68d9808f 100644 --- a/src/clj/auto_ap/routes/checks.clj +++ b/src/clj/auto_ap/routes/checks.clj @@ -178,7 +178,7 @@ (defmulti check-for-invoices (fn [invoices vendor-id vendors company bank-account index invoice-amounts] - (:type bank-account))) + (or (:type bank-account) "check"))) (defmethod check-for-invoices "check" [invoices vendor-id vendors company bank-account index invoice-amounts] (let [uuid (str (UUID/randomUUID)) diff --git a/src/clj/auto_ap/yodlee/import.clj b/src/clj/auto_ap/yodlee/import.clj index d5302f26..d43e91a0 100644 --- a/src/clj/auto_ap/yodlee/import.clj +++ b/src/clj/auto_ap/yodlee/import.clj @@ -112,6 +112,7 @@ (defn do-import [] (let [transactions (client/get-transactions) + _ (println "ALL Transactions:" transactions) all-bank-accounts (mapcat (fn [c] (map (fn [{:keys [id yodlee-account-id]}] (when (and id yodlee-account-id)