Fixes a few issues discovered

2023-05-13 23:36:14 -07:00
parent 8bd73b8a98
commit 3ce9cceee0
6 changed files with 74 additions and 69 deletions
--- a/src/clj/auto_ap/solr.clj
+++ b/src/clj/auto_ap/solr.clj
@@ -167,9 +167,12 @@
            (->RealSolrClient (:solr-uri env))
            (->MockSolrClient )))

+
+
+
+
 (defn touch-with-ledger [i]
-  (index-documents impl [i
-                    (pull-id (dc/db conn) [:journal-entry/original-entity i])]))
+  (index-documents impl [i [:journal-entry/original-entity i]]))

 (defn touch [i]
  (index-documents impl [i]))