Merge branch 'master' into staging

src/clj/auto_ap/background/sysco.clj

@@ -70,6 +70,7 @@
                             (and customer-identifier
                                  (parse/best-match clients customer-identifier)))
         total (Double/parseDouble (summary-row "TotalExtendedPrice"))
+        tax (Double/parseDouble (summary-row "TotalTaxAmount"))
         date (t/parse
               (header-row "InvoiceDate")
               "yyMMdd")
@@ -79,7 +80,7 @@
     (log/infof "Importing %s for %s" (header-row "InvoiceNumber") (header-row "CustomerName"))
 
     [:propose-invoice (cond-> #:invoice {:invoice-number (header-row "InvoiceNumber")
-                                         :total total
+                                         :total (+ total tax)
                                          :outstanding-balance total
                                          :date  (coerce/to-date date)
                                          :vendor (:db/id sysco-vendor )

src/clj/auto_ap/yodlee/core.clj

@@ -302,7 +302,7 @@
 
 (defn get-provider-accounts-with-details []
   (let [provider-accounts (get-provider-accounts)]
-    (let [concurrent 20
+    (let [concurrent 10
           output-chan (async/chan)]
       (async/pipeline-blocking concurrent
                                output-chan