two minor fixes
This commit is contained in:
@@ -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))))
|
||||
|
||||
Reference in New Issue
Block a user