Makes multiple client selection somewhat possible via graphql.
This commit is contained in:
@@ -85,6 +85,7 @@
|
||||
(let [headers (if token
|
||||
(assoc headers "Authorization" (str "Token " token))
|
||||
headers)
|
||||
headers (assoc headers "x-clients" (pr-str (:selected-clients @re-frame.db/app-db)))
|
||||
response (<! (http/request {:method method
|
||||
:body body
|
||||
:headers headers
|
||||
@@ -155,7 +156,7 @@
|
||||
|
||||
(re-frame/reg-fx
|
||||
:graphql
|
||||
(fn [{:keys [query on-success on-error token variables query-obj owns-state]}]
|
||||
(fn [{:keys [query on-success on-error token variables query-obj owns-state db]}]
|
||||
(go
|
||||
(when (:multi owns-state)
|
||||
(re-frame/dispatch-sync [::status/loading-multi (:multi owns-state) (:which owns-state)]))
|
||||
@@ -165,6 +166,7 @@
|
||||
(let [headers (if token
|
||||
{"Authorization" (str "Token " token)}
|
||||
{})
|
||||
headers (assoc headers "x-clients" (pr-str (:selected-clients @re-frame.db/app-db)))
|
||||
on-success (if (fn? on-success)
|
||||
on-success
|
||||
(fn [result]
|
||||
|
||||
Reference in New Issue
Block a user