now invoices are by vendor and company

src/clj/auto_ap/background/mail.clj

@@ -2,6 +2,7 @@
   (:require [amazonica.aws.s3 :as s3]
             [amazonica.aws.sqs :as sqs]
             [auto-ap.db.companies :as companies]
+            [auto-ap.db.vendors :as vendors]
             [auto-ap.db.invoices :as invoices]
             [auto-ap.parse :as parse]
             [clojure-mail.message :as message]
@@ -16,7 +17,8 @@
 (defn process-sqs []
   (try
     (println "Fetching messages from sqs...")
-    (let [companies (companies/get-all)]
+    (let [companies (companies/get-all)
+          vendors (vendors/get-all)]
       (doseq [message (:messages (sqs/receive-message {:queue-url (:invoice-import-queue-url env)
                                                        :wait-time-seconds 5
                                                        :max-number-of-messages 10