unique locations

This commit is contained in:
2026-05-26 21:56:58 -07:00
parent a4d7ac5982
commit 11cc887671
2 changed files with 657 additions and 3 deletions

View File

@@ -558,8 +558,10 @@
(and (= (count (:clients args)) 1)
(= 1 (count (:client/locations (:client args))))))
:render (fn [x] [:div.flex.items-center.gap-2 (-> x :invoice/client :client/name)
(map #(com/pill {:color :primary} (-> % :invoice-expense-account/location))
(:invoice/expense-accounts x))])}
(->> (:invoice/expense-accounts x)
(map :invoice-expense-account/location)
(set)
(map #(com/pill {:color :primary} %)))])}
{:key "vendor"
:name "Vendor"
:sort-key "vendor"
@@ -1807,4 +1809,4 @@
(wrap-merge-prior-hx)
(wrap-schema-enforce :query-schema query-schema)
(wrap-schema-enforce :hx-schema query-schema)
(wrap-client-redirect-unauthenticated)))))
(wrap-client-redirect-unauthenticated)))))