really improved vendor dialog code.
This commit is contained in:
@@ -137,6 +137,7 @@
|
||||
:graphql
|
||||
(fn [{:keys [query on-success on-error token variables query-obj]}]
|
||||
(go
|
||||
(println on-error)
|
||||
(let [headers (if token
|
||||
{"Authorization" (str "Token " token)}
|
||||
{})
|
||||
@@ -155,12 +156,12 @@
|
||||
:body (when = (:post method) query)
|
||||
:url (str "/api/graphql?query=" (when (= :get method) (js/encodeURIComponent query))
|
||||
"&variables=" (pr-str (or variables {})))}))]
|
||||
|
||||
(cond
|
||||
(= (:status response) 401)
|
||||
(re-frame/dispatch [:auto-ap.events/logout "Your session has expired. Please log in again."])
|
||||
|
||||
|
||||
|
||||
(>= (:status response) 400)
|
||||
(when on-error
|
||||
(->> response
|
||||
|
||||
Reference in New Issue
Block a user