21 lines
513 B
Plaintext
21 lines
513 B
Plaintext
|
(ns yenu.ajax
|
||
|
(:require [ajax.core :as ajax]))
|
||
|
|
||
|
(defn local-uri? [{:keys [uri]}]
|
||
|
(not (re-find #"^\w+?://" uri)))
|
||
|
|
||
|
(defn default-headers [request]
|
||
|
(if (local-uri? request)
|
||
|
(-> request
|
||
|
(update :uri #(str js/context %))
|
||
|
(update :headers #(merge {"x-csrf-token" js/csrfToken} %)))
|
||
|
request))
|
||
|
|
||
|
(defn load-interceptors! []
|
||
|
(swap! ajax/default-interceptors
|
||
|
conj
|
||
|
(ajax/to-interceptor {:name "default headers"
|
||
|
:request default-headers})))
|
||
|
|
||
|
|