From a7a0867dc29af983d1b626ac87607a2daa8a9d0b Mon Sep 17 00:00:00 2001
From: Bryce Covert <bryce@brycecovertoperations.com>
Date: Mon, 5 Dec 2022 10:55:57 -0800
Subject: [PATCH] two minor fixes

---
 src/clj/auto_ap/jobs/register_invoice_import.clj | 4 ++--
 src/cljs/auto_ap/views/pages/admin/jobs.cljs     | 3 ++-
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/src/clj/auto_ap/jobs/register_invoice_import.clj b/src/clj/auto_ap/jobs/register_invoice_import.clj
index 29723aa1..3c88d2b7 100644
--- a/src/clj/auto_ap/jobs/register_invoice_import.clj
+++ b/src/clj/auto_ap/jobs/register_invoice_import.clj
@@ -129,8 +129,8 @@
     (log/info "contains " (count data) " rows")
     (doseq [n (partition-all 50 (register-invoice-import* data))]
       (log/info "transacting" n)
-      (audit-transact data {:user/name "register-invoice-import"
-                            :user/role "admin"}))))
+      (audit-transact n {:user/name "register-invoice-import"
+                         :user/role "admin"}))))
 
 (defn -main [& _]
   (execute "register-invoice-import" #(register-invoice-import (:args env))))
diff --git a/src/cljs/auto_ap/views/pages/admin/jobs.cljs b/src/cljs/auto_ap/views/pages/admin/jobs.cljs
index ac497b29..0bbe43e4 100644
--- a/src/cljs/auto_ap/views/pages/admin/jobs.cljs
+++ b/src/cljs/auto_ap/views/pages/admin/jobs.cljs
@@ -51,7 +51,8 @@
  ::success
  (fn [{:keys [db]} [_ n]]
    {:db (assoc db ::msg (:message (:request-job n)))
-    :dispatch [::params-change]}))
+    :dispatch-n [[::params-change]
+                 [::modal/modal-closed]]}))
 
 (re-frame/reg-event-fx
  ::saving