Made error page look pretty good

src/clj/auto_ap/ssr/admin/background_jobs.clj

@@ -210,10 +210,7 @@
       (com/modal ;; TODO we need a cleaner way to have forms that wrap the whole. In this cas
         {}
         [:form {:hx-post       (bidi/path-for ssr-routes/only-routes :admin-job-start)
-                :class         "h-full w-full"
-                "x-on:htmx:response-error" "unexpectedError=true" 
-                "x-on:htmx:before-request" "unexpectedError=false"
-                :x-data (hx/json {:unexpectedError false})}
+                :class         "h-full w-full"}
          [:fieldset {:class "hx-disable h-full w-full"}
           (com/modal-card {}
             [:div.m-2 "New job"]
@@ -243,8 +240,7 @@
 
              [:div#sub-form (subform* {:name (fc/with-field :name (fc/field-value))}) ]]
             [:div
-             [:div#5xx-error.bg-red-100.mb-2.p-1 {:x-show "unexpectedError"}
-              "An unexpected error has occured."]
+             
              (com/form-errors {:errors (:errors fc/*form-errors*)})
              (com/validated-save-button {:errors form-errors} "Run job")])]]))))
 

src/clj/auto_ap/ssr/admin/transaction_rules.clj

@@ -53,7 +53,8 @@
    [clojure.set :as set]
    [clojure.string :as str]
    [datomic.api :as dc]
-   [malli.core :as mc]))
+   [malli.core :as mc]
+   [auto-ap.logging :as alog]))
 
 (defn filters [request]
   [:form {"hx-trigger"   "change delay:500ms, keyup changed from:.hot-filter delay:1000ms"
@@ -777,9 +778,9 @@
                                                              (-> t :transaction/client :client/locations))))])
                           transactions)
                     identity)
-
     (doseq [n transactions]
       (solr/touch-with-ledger (:db/id n)))
+
     (html-response [:div]
                    :headers {"hx-trigger" (hx/json {:modalclose   ""
                                                     :notification (format "Successfully coded %d of %d transactions!"