Makes background jobs work again

src/clj/auto_ap/ssr/transaction/insights.clj

@@ -1,21 +1,21 @@
 (ns auto-ap.ssr.transaction.insights
   (:require
    [auto-ap.client-routes :as client-routes]
-   [auto-ap.datomic :refer [conn pull-attr visible-clients]]
+   [auto-ap.datomic :refer [conn visible-clients]]
    [auto-ap.rule-matching :refer [spread-cents]]
    [auto-ap.ssr-routes :as ssr-routes]
    [auto-ap.ssr.components :as com]
    [auto-ap.ssr.svg :as svg]
    [auto-ap.ssr.ui :refer [base-page]]
-   [auto-ap.ssr.utils :refer [html-response]]
+   [auto-ap.ssr.utils :refer [html-response modal-response]]
    [auto-ap.time :as atime]
    [bidi.bidi :as bidi]
    [cemerick.url :as url]
    [clj-http.client :as http]
    [clj-time.coerce :as coerce]
    [datomic.api :as dc]
-   [iol-ion.tx :refer [random-tempid]]
-   [hiccup2.core :as hiccup]))
+   [hiccup2.core :as hiccup]
+   [iol-ion.tx :refer [random-tempid]]))
 
 (def pull-expr [:transaction/description-original
                 :db/id
@@ -238,7 +238,7 @@
                    pull-expr
                    (Long/parseLong transaction-id))
         similar   (pinecone-similarity-list transaction-id)]
-    (html-response
+    (modal-response
      (com/modal {}
                 (com/modal-card {:style {:width "900px"}}
                                 [:div.flex [:div.p-2 "Similar Transactions"]]