Add Content-Type header to default handlers

Fixes #53.
weavejester · Jul 8, 2024 · 551475e · 551475e
1 parent 087c331
commit 551475e
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 4 deletions.
diff --git a/src/ring/middleware/oauth2.clj b/src/ring/middleware/oauth2.clj
@@ -137,13 +137,17 @@
 
 (defn state-mismatch-handler
   ([_]
-   {:status 400, :headers {}, :body "State mismatch"})
+   {:status  400
+    :headers {"Content-Type" "text/plain; charset=utf-8"}
+    :body    "OAuth2 error: state mismatch"})
   ([request respond _]
    (respond (state-mismatch-handler request))))
 
 (defn no-auth-code-handler
   ([_]
-   {:status 400, :headers {}, :body "No authorization code"})
+   {:status  400
+    :headers {"Content-Type" "text/plain; charset=utf-8"}
+    :body    "OAuth2 error: no authorization code"})
   ([request respond _]
    (respond (no-auth-code-handler request))))
 

diff --git a/test/ring/middleware/oauth2_test.clj b/test/ring/middleware/oauth2_test.clj
@@ -141,7 +141,9 @@
                          (assoc :query-params {"code"  "abcabc"
                                                "state" "xyzxya"}))
             response (test-handler request)]
-        (is (= {:status 400, :headers {}, :body "State mismatch"}
+        (is (= {:status  400
+                :headers {"Content-Type" "text/plain; charset=utf-8"}
+                :body    "OAuth2 error: state mismatch"}
                response))))
 
     (testing "custom state mismatched error"
@@ -162,7 +164,9 @@
                          (assoc :session {::oauth2/state "xyzxyz"})
                          (assoc :query-params {"state" "xyzxyz"}))
             response (test-handler request)]
-        (is (= {:status 400, :headers {}, :body "No authorization code"}
+        (is (= {:status  400
+                :headers {"Content-Type" "text/plain; charset=utf-8"}
+                :body    "OAuth2 error: no authorization code"}
                response))))
 
     (testing "custom no authorization code error"