diff --git a/src/wrike_ist/azure.cljs b/src/wrike_ist/azure.cljs index 1e7dfe6..84e0fbd 100644 --- a/src/wrike_ist/azure.cljs +++ b/src/wrike_ist/azure.cljs @@ -10,7 +10,8 @@ (some-> js/process .-env .-AZURE_TOKEN .trim)) (defn- headers [] - {:Authorization (str "Basic " (js/btoa (str ":" (azure-token))))}) + {:Authorization (str "Basic " (js/btoa (str ":" (azure-token)))) + :Content-Type "application/json"}) (defn parse-body [response] @@ -54,8 +55,7 @@ (get (parse-body response) "comments")))) (.then (fn add-link-comment [& _] (let [comment-text (link-html details) - params (clj->js {:text comment-text - :plainText false})] + params (clj->js {:text comment-text})] (js/console.log (str "add-link-comment: params:" (js/JSON.stringify params))) (-> (http/post uri {:headers (headers) :body (js/JSON.stringify params)})