Fixes mistake in client selection on 1099 page.
This commit is contained in:
@@ -28,7 +28,6 @@
|
|||||||
(and (some-> session :client :db/id)
|
(and (some-> session :client :db/id)
|
||||||
(can-see-client? user
|
(can-see-client? user
|
||||||
(some-> session :client :db/id)))
|
(some-> session :client :db/id)))
|
||||||
:else
|
|
||||||
(d/q '[:find
|
(d/q '[:find
|
||||||
(pull ?c [:client/code :db/id])
|
(pull ?c [:client/code :db/id])
|
||||||
(pull ?v [:db/id
|
(pull ?v [:db/id
|
||||||
@@ -88,6 +87,8 @@
|
|||||||
[?p :payment/vendor ?v]]
|
[?p :payment/vendor ?v]]
|
||||||
(d/db conn))
|
(d/db conn))
|
||||||
|
|
||||||
|
|
||||||
|
:else
|
||||||
(d/q '[:find
|
(d/q '[:find
|
||||||
(pull ?c [:client/code :db/id])
|
(pull ?c [:client/code :db/id])
|
||||||
(pull ?v [:db/id
|
(pull ?v [:db/id
|
||||||
|
|||||||
Reference in New Issue
Block a user