notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

minor fixes from kyle

Browse Source
This commit is contained in:
Bryce
2023-11-09 21:26:35 -08:00
parent d1d716b21d
commit 384bb23aa2
2 changed files with 15 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/clj/auto_ap/ssr/admin/transaction_rules.clj
View File

@@ -321,6 +321,7 @@
only-uncoded? :only-uncoded?}]
(let [valid-clients (extract-client-ids clients
client)
bank-account (or (:db/id bank-account) bank-account)
query (cond-> {:query {:find ['(pull ?e read)]
:in ['$ 'read]
@@ -495,7 +496,7 @@
{:errors (fc/field-errors)}
[:div {:hx-trigger "changed"
:hx-target "next div"
:hx-vals (format "js:{name: '%s', 'client-id': event.detail.clientId, value: event.detail.accountId}" account-name)
:hx-vals (format "js:{name: '%s', 'client-id': event.detail.clientId, value: event.detail.accountId || ''}" account-name)
:hx-get (str (bidi/path-for ssr-routes/only-routes ::route/account-typeahead))
:x-init "$watch('clientId', cid => $dispatch('changed', $data));"}]
(account-typeahead* {:value (fc/field-value)
@@ -511,7 +512,7 @@
[:div {:hx-trigger "changed"
:hx-target "next *"
:hx-swap "outerHTML"
:hx-vals (format "js:{name: '%s', 'client-id': event.detail.clientId || '', 'account-id': event.detail.accountId || '', value: event.detail.location}" (fc/field-name) )
:hx-vals (format "js:{name: '%s', 'client-id': event.detail.clientId || '', 'account-id': event.detail.accountId || '', value: event.detail.location || ''}" (fc/field-name) )
:hx-get (bidi/path-for ssr-routes/only-routes ::route/location-select)
:x-init "$watch('clientId', cid => $dispatch('changed', $data)); $watch('accountId', cid => $dispatch('changed', $data) )"}]
(location-select* {:name (fc/field-name)
@@ -686,7 +687,7 @@
:hx-get (bidi/path-for ssr-routes/only-routes
::route/new-account)
:index (count (fc/field-value))
:tr-params (hx/bind-alpine-vals {} {:client-id "clientId"})}
:tr-params (hx/bind-alpine-vals {} {"client-id" "clientId"})}
"New account")))))
(fc/with-field :transaction-rule/transaction-approval-status
@@ -722,7 +723,7 @@
(transaction-rule-account-row*
fc/*current*
client-id
(some->> client-id (pull-attr (dc/db conn) :client/locations) client-id)))))
(some->> client-id (pull-attr (dc/db conn) :client/locations))))))
(defn all-ids-not-locked [all-ids]
(->> all-ids