removing old square
This commit is contained in:
@@ -752,8 +752,7 @@
|
||||
:client/square-auth-token
|
||||
{:client/square-locations [:db/id :square-location/name :square-location/square-id :square-location/client-location]}])
|
||||
:in $
|
||||
:where [?c :client/square-auth-token]
|
||||
[?c :client/feature-flags "new-square"]]
|
||||
:where [?c :client/square-auth-token]]
|
||||
(dc/db conn))))
|
||||
([ & codes]
|
||||
(map first (dc/q '[:find (pull ?c [:db/id
|
||||
@@ -762,7 +761,6 @@
|
||||
{:client/square-locations [:db/id :square-location/name :square-location/square-id :square-location/client-location]}])
|
||||
:in $ [?code ...]
|
||||
:where [?c :client/square-auth-token]
|
||||
[?c :client/feature-flags "new-square"]
|
||||
[?c :client/code ?code]]
|
||||
(dc/db conn)
|
||||
codes))))
|
||||
|
||||
Reference in New Issue
Block a user