From cdccaf0572ea87520c3ca3c55d5ea5c51ece92f6 Mon Sep 17 00:00:00 2001
From: Bryce Covert <contact.bryce@brycecovertoperations.com>
Date: Fri, 2 Oct 2020 07:18:39 -0700
Subject: [PATCH] minor tweaks.

---
 src/clj/auto_ap/graphql/ledger.clj | 2 --
 src/clj/auto_ap/square/core.clj    | 6 +++---
 src/clj/auto_ap/yodlee/core.clj    | 1 -
 3 files changed, 3 insertions(+), 6 deletions(-)

diff --git a/src/clj/auto_ap/graphql/ledger.clj b/src/clj/auto_ap/graphql/ledger.clj
index fe617733..a4c36567 100644
--- a/src/clj/auto_ap/graphql/ledger.clj
+++ b/src/clj/auto_ap/graphql/ledger.clj
@@ -29,8 +29,6 @@
                                    (fn [jels]
                                      (mapv
                                       (fn [jel]
-                                        (log/info (get-in @running-balance-cache [(:db/id (:journal-entry/client je))
-                                                                                  (:db/id jel)]))
                                         (assoc jel :running-balance (get-in @running-balance-cache [(:db/id (:journal-entry/client je))
                                                                                                (:db/id jel)])))
 
diff --git a/src/clj/auto_ap/square/core.clj b/src/clj/auto_ap/square/core.clj
index 5f414eda..23a8d75f 100644
--- a/src/clj/auto_ap/square/core.clj
+++ b/src/clj/auto_ap/square/core.clj
@@ -120,7 +120,7 @@
 
 (defn location_id->client-location [location]
   ({"2RVBYER6QSV7W" ["NGAK" "MH"]
-    "8JT71V8XGYAT3" ["NGKG" "NB"]
+    #_#_"8JT71V8XGYAT3" ["NGKG" "NB"]
     "SCX0Y8CTGM1S0" ["NGE1" "UC"]
     "FNH5VRT890WK8" ["NGMJ" "SC"]
     "AMQ0NPA8FGDEF" ["NGPG" "SZ"]
@@ -265,11 +265,11 @@
    (map (fn [x] [:db/retractEntity x]))))
 
 (mount/defstate square-loader
-  :start (scheduler/every (* 15 60 1000) upsert)
+  :start (scheduler/every (* 13 60 1000) upsert)
   :stop (scheduler/stop square-loader))
 
 (mount/defstate square-settlement-loader
-  :start (scheduler/every (* 15 60 1000) upsert-settlements)
+  :start (scheduler/every (* 14 60 1000) upsert-settlements)
   :stop (scheduler/stop square-settlement-loader))
 
 (comment
diff --git a/src/clj/auto_ap/yodlee/core.clj b/src/clj/auto_ap/yodlee/core.clj
index 6cd17a5e..7ae8daa8 100644
--- a/src/clj/auto_ap/yodlee/core.clj
+++ b/src/clj/auto_ap/yodlee/core.clj
@@ -268,7 +268,6 @@
                              output-chan
                              (map (fn [provider-account-id]
                                     (lc/with-context {:provider-account-id provider-account-id}
-                                      (log/info "fetching accounts for provider" provider-account-id)
                                       [provider-account-id
                                        (get-accounts-for-provider-account provider-account-id)])))
                              (async/to-chan provider-account-ids))