Add vendor pre-population for bulk code and individual edit forms

- Add vendor-changed HTMX handlers for both bulk code and individual edit
- Pre-populate default account at 100% when vendor is selected and no accounts exist
- Fix render-accounts-section to render from step-params correctly
- Change bulk code vendor-changed from hx-get to hx-post to include form data
- Add routes for vendor-changed endpoints
- Update e2e tests to cover vendor pre-population
- Run lein cljfmt fix across codebase

src/clj/auto_ap/ssr/components/inputs.clj

@@ -8,7 +8,6 @@
    [clojure.string :as str]
    [hiccup2.core :as hiccup]))
 
-
 (def default-input-classes
   ["bg-gray-50" "border" "text-sm" "rounded-lg" "" "block"
    "p-2.5" "border-gray-300" "text-gray-900" "focus:ring-blue-500" "focus:border-blue-500"
@@ -149,7 +148,6 @@
       [:li  {":style" "index  == 0  && 'border: 0 !important;'"}
        [:label {:class           "p-3 group rounded flex gap-2 items-center outline-0 focus:bg-neutral-100 hover:bg-neutral-100 whitespace-nowrap [&.active]:bg-primary-300 [&.active]:dark:bg-primary-700 [&.implied]:text-gray-500 text-gray-800  dark:text-gray-100 cursor-pointer"
 
-
                 :href            "#"
                 ":class" (hx/json {"active"  (hx/js-fn "active==index")
                                    "implied" (hx/js-fn "all_selected && index != 0")})
@@ -178,7 +176,6 @@
           :x-show "value.size > 0"}
     svg/x]])
 
-
 (defn multi-typeahead- [params]
   [:div.relative {:x-data (hx/json {:baseUrl (str (:url params))
                                     :reset_elements (js-fn "function(e) {
@@ -268,21 +265,17 @@
               :x-effect "if (value.warning) { $nextTick(()=> warning_badge.update()) }"}
         (tags/badge- {:class "peer"} "!")
 
-
         [:div {:x-show "value.warning"
                :x-ref "warning_pop"
                :class "hidden peer-hover:block bg-red-50 dark:bg-gray-600 rounded-lg shadow-2xl w-max z-50 p-4"
                :x-text "value.warning"}]]]
       (multi-typeahead-dropdown- params)])])
 
-
 (defn use-size [size]
   (if (= :small size)
     (str " " "text-xs p-2")
     (str " " "text-sm p-2.25")))
 
-
-
 (defn text-input- [{:keys [size error?] :as params}]
   [:input
    (-> params
@@ -415,8 +408,6 @@
            (update :class #(str % (use-size size) " w-full"))
            (dissoc :size :name :x-model :x-modelable))]]))
 
-
-
 (defn field-errors- [{:keys [source key]} & rest]
   (let [errors (:errors (cond-> (meta source)
                           key (get key)))]
@@ -469,8 +460,6 @@
 (defn hidden- [{:keys [name value] :as params}]
   [:input (merge {:type "hidden" :value value :name name} params)])
 
-
-
 (defn toggle- [params & children]
   [:label {:class "inline-flex items-center cursor-pointer"}
    [:input (merge {:type "checkbox", :class "sr-only peer"} params)]