square fixes

src/clj/auto_ap/jobs/import_uploaded_invoices.clj

@@ -66,8 +66,7 @@
                                        (map #(assoc %
                                                     :source-url (str "https://" (:data-bucket env)
                                                                      "/"
-                                                                     s3-location)
-                                                    :import-status :import-status/imported)))]
+                                                                     s3-location) :import-status :import-status/imported)))]
                       (alog/info ::found-imports :imports imports)
                       (invoices/import-uploaded-invoice {:user/role "admin" :user/name "Email Invoice Importer"} imports))))
                 (catch Exception e
@@ -79,3 +78,28 @@
 
 (defn -main [& _]
   (execute "import-uploaded-invoices" process-sqs))
+
+
+(comment 
+  (with-open [i (io/output-stream "/tmp/bryce.pdf")]
+    (clojure.java.io/copy 
+     (-> (s3/get-object :bucket-name (:data-bucket env)
+                        :key "invoice-files/f0e73dcb-e5e5-4c81-b82b-319b7caedacf.pdf"
+                        
+                        )
+         :input-stream)
+     i))
+
+  (parse/parse-file "/tmp/bryce.pdf" "/tmp/bryce.pdf")
+
+  
+ (->  (clojure.java.shell/sh "pdftotext" "-layout" "/tmp/bryce.pdf" "-")
+        :out
+        ) 
+
+ 
+  1
+
+  (user/init-repl)
+
+  )