improvements

src/clj/auto_ap/parse.clj

@@ -208,4 +208,8 @@
   (println v)
   (map
     (fn [x] (dissoc x :full-text :text))
-    (parse v)))
+    (parse v)))
+    
+#_(nth (re-find #"ELECTRONICALLY.*\n\s*(.*?)\s{2,}" @last-text)
+
+     1)

src/clj/auto_ap/parse/templates.clj

@@ -746,9 +746,9 @@
     :multi #"\n"
     :multi-match? #"INV #"}
    {:vendor   "Paulino's Bakery"
-    :keywords [#"Paulino's Bakery" #"Statement"]
+    :keywords [#"paulinosbakery"]
     :extract  {:date                #"\s*([0-9]+/[0-9]+/[0-9]+)"
-               :customer-identifier #"To:\s*\n\s+(.*?)\s{2,}"
+               :customer-identifier #"831-333-1010\s*\n\s+(.*?)\s{2,}"
                :invoice-number      #"INV #(\d+)"
                :total               #"INV #(?:.*?)\s{2,}([\d\-,]+\.\d{2,2}+)"}
     :parser   {:date  [:clj-time "MM/dd/yyyy"]

src/clj/auto_ap/ssr/invoices.clj

@@ -1369,7 +1369,7 @@
                                                       :payment-type/credit
                                                       :else :payment-type/debit)
                                                 identity
-                                                (:handwritten-date snapshot))
+                               (:handwritten-date snapshot))
                          (catch Exception e
                            (println e))))))]
       (modal-response

src/clj/user.clj

@@ -329,7 +329,7 @@
 
 #_{:clj-kondo/ignore [:clojure-lsp/unused-public-var]}
 (defn tx-detail [i]
-  (map (juxt :e #(pull-attr (dc/db conn) :db/ident (:a %)) :v)
+  (map (juxt :e #(pull-attr (dc/db conn) :db/ident (:a %)) :v :added)
        (:data (first
                (dc/tx-range (dc/log conn)
                             i