add another test

babashka · Apr 18, 2024 · 108fda2 · 108fda2
1 parent 0e06738
commit 108fda2
Showing 1 changed file with 12 additions and 6 deletions.
diff --git a/test/babashka/http_client_test.clj b/test/babashka/http_client_test.clj
@@ -535,12 +535,18 @@
                                   "q=%26moo"))))))
 
 (deftest ring-client-test
-  (let [resp (http/get "https://clojure.org"
-                       {:client (fn [req]
-                                  {:body (java.io.ByteArrayInputStream. (.getBytes "Hello"))
-                                   :clojure (= "https://clojure.org" (str (:uri req)))})})]
-    (is (:clojure resp))
-    (is (= "Hello" (:body resp)))))
+  (testing "string body"
+    (let [resp (http/get "https://clojure.org"
+                         {:client (fn [_req]
+                                    {:body "Hello"})})]
+      (is (= "Hello" (:body resp)))))
+  (testing "inputstring body"
+    (let [resp (http/get "https://clojure.org"
+                         {:client (fn [req]
+                                    {:body (java.io.ByteArrayInputStream. (.getBytes "Hello"))
+                                     :clojure (= "https://clojure.org" (str (:uri req)))})})]
+      (is (:clojure resp))
+      (is (= "Hello" (:body resp))))))
 
 (comment
   (run-server)