extra logging
This commit is contained in:
@@ -590,6 +590,7 @@
|
|||||||
:bulk_code_transactions {:type :message
|
:bulk_code_transactions {:type :message
|
||||||
:args {:filters {:type :transaction_filters}
|
:args {:filters {:type :transaction_filters}
|
||||||
:vendor {:type :id}
|
:vendor {:type :id}
|
||||||
|
:client_id {:type :id}
|
||||||
:approval_status {:type :transaction_approval_status}
|
:approval_status {:type :transaction_approval_status}
|
||||||
:accounts {:type '(list :edit_percentage_account)}
|
:accounts {:type '(list :edit_percentage_account)}
|
||||||
:ids {:type '(list :id)}}
|
:ids {:type '(list :id)}}
|
||||||
|
|||||||
@@ -224,7 +224,9 @@
|
|||||||
[client-id])
|
[client-id])
|
||||||
x-clients)
|
x-clients)
|
||||||
(catch Exception e
|
(catch Exception e
|
||||||
(alog/warn ::cant-access :error e)
|
(alog/warn ::cant-access :error e
|
||||||
|
:identity identity
|
||||||
|
:x-clients (pr-str x-clients))
|
||||||
:all))
|
:all))
|
||||||
new-request (if x-clients
|
new-request (if x-clients
|
||||||
(assoc-in request [:session :client-selection] x-clients)
|
(assoc-in request [:session :client-selection] x-clients)
|
||||||
|
|||||||
Reference in New Issue
Block a user