account tests.

2023-03-24 15:34:43 -07:00
parent bfa04ef83f
commit eb7394b42b
4 changed files with 31 additions and 29 deletions
--- a/src/clj/auto_ap/datomic.clj
+++ b/src/clj/auto_ap/datomic.clj
@@ -617,7 +617,6 @@
   :count (count results)})

 (defn audit-transact-batch [txes id]
-  (println "transacting batch")
  (let [batch-id (.toString (java.util.UUID/randomUUID))]
    (reduce
     (fn [full-tx batch]
@@ -637,8 +636,7 @@
           true (update :tempids merge (:tempids tx-result)))))

     {}
-     (partition-all 200 txes)))
-  (println "done"))
+     (partition-all 200 txes))))

 (defn audit-transact [txes id]
  (dc/transact conn {:tx-data (conj txes {:db/id      "datomic.tx"