Resets selected on page change, adds account number to drop downs and makes missing emails less noisy
This commit is contained in:
@@ -261,8 +261,7 @@
|
||||
(defn client-override* [override]
|
||||
(com/data-grid-row (-> {:x-ref "p"
|
||||
:data-key "show"
|
||||
:x-data (hx/json {:show (boolean (doto (not (fc/field-value (:new? override)))
|
||||
println))})}
|
||||
:x-data (hx/json {:show (boolean (not (fc/field-value (:new? override))))})}
|
||||
hx/alpine-mount-then-appear)
|
||||
(fc/with-field :db/id
|
||||
(com/hidden {:name (fc/field-name)
|
||||
|
||||
@@ -369,7 +369,6 @@
|
||||
|
||||
true
|
||||
(merge-query {:query {:where ['[?e :transaction/id]]}}))
|
||||
_ (alog/peek query)
|
||||
results (->>
|
||||
(query2 query)
|
||||
(map first))]
|
||||
@@ -431,8 +430,13 @@
|
||||
:x-model x-model
|
||||
:value value
|
||||
:content-fn (fn [value]
|
||||
(:account/name (d-accounts/clientize (dc/pull (dc/db conn) d-accounts/default-read value)
|
||||
client-id)))})])
|
||||
(let [a (dc/pull (dc/db conn) d-accounts/default-read value)]
|
||||
(when value
|
||||
(str
|
||||
(:account/numeric-code a)
|
||||
" - "
|
||||
(:account/name (d-accounts/clientize a
|
||||
client-id))))))})])
|
||||
|
||||
(defn- transaction-rule-account-row*
|
||||
[account client-id client-locations]
|
||||
|
||||
Reference in New Issue
Block a user