diff --git a/src/clj/auto_ap/datomic.clj b/src/clj/auto_ap/datomic.clj
index 998b5f5c..e5baf03c 100644
--- a/src/clj/auto_ap/datomic.clj
+++ b/src/clj/auto_ap/datomic.clj
@@ -626,7 +626,7 @@
                                 :audit/batch batch-id})
              _ (log/info "transacting batch " batch-id " " (count batch))
              tx-result @(d/transact conn batch)
-             _ (Thread/sleep 1000)]
+             _ (Thread/sleep 100)]
 
          (cond-> full-tx
            (:tx-data full-tx) (update :tx-data #(into % (:tx-data tx-result)))