Migrates back to datomic on-prem

src/clj/auto_ap/datomic/transaction_rules.clj

@@ -6,10 +6,11 @@
             apply-sort-3
             conn
             merge-query
-            pull-many]]
+            pull-many
+            query2]]
    [auto-ap.graphql.utils :refer [limited-clients]]
    [clojure.string :as str]
-   [datomic.client.api :as dc]))
+   [datomic.api :as dc]))
 
 (defn <-datomic [result]
   result)
@@ -82,8 +83,7 @@
                                       :where ['[?e :transaction-rule/transaction-approval-status]]}}))]
 
     
-    (cond->> query
-      true (dc/q)
+    (cond->> (query2 query)
       true (apply-sort-3 args)
       true (apply-pagination args))))
 
@@ -109,10 +109,10 @@
 
 (defn get-all []
   (mapv first
-        (dc/q {:query {:find  [(list 'pull '?e default-read )]
-                       :in    ['$]
-                       :where ['[?e :transaction-rule/transaction-approval-status]]}
-               :args  [(dc/db conn)]})))
+        (dc/q {:find  [(list 'pull '?e default-read )]
+               :in    ['$]
+               :where ['[?e :transaction-rule/transaction-approval-status]]}
+              (dc/db conn))))
 
 (defn get-all-for-client [client-id]
   (mapv first