fix(clojure): don't crash if there's no postData content (readmeio#171)

erunion · web-flow · commit 44786588ad6c · 2023-05-25T15:37:09.000-07:00
diff --git a/src/targets/clojure/clj_http/client.test.ts b/src/targets/clojure/clj_http/client.test.ts
@@ -0,0 +1,34 @@
+import type { Request } from '../../..';
+
+import { runCustomFixtures } from '../../../fixtures/runCustomFixtures';
+
+runCustomFixtures({
+  targetId: 'clojure',
+  clientId: 'clj_http',
+  tests: [
+    {
+      it: 'should not crash if there is no `postData.text`',
+      input: {
+        headers: [
+          {
+            name: 'accept',
+            value: 'application/json',
+          },
+          {
+            name: 'content-type',
+            value: 'application/json',
+          },
+        ],
+        postData: {
+          mimeType: 'application/json',
+        },
+        bodySize: 0,
+        method: 'POST',
+        url: 'https://httpbin.org/anything',
+        httpVersion: 'HTTP/1.1',
+      } as Request,
+      options: {},
+      expected: 'should-not-crash.clj',
+    },
+  ],
+});
diff --git a/src/targets/clojure/clj_http/client.ts b/src/targets/clojure/clj_http/client.ts
@@ -45,7 +45,9 @@ const jsType = (input?: any) => {
 };
 
 const objEmpty = (input?: any) => {
-  if (jsType(input) === 'object') {
+  if (input === undefined) {
+    return true;
+  } else if (jsType(input) === 'object') {
     return Object.keys(input).length === 0;
   }
   return false;
diff --git a/src/targets/clojure/clj_http/fixtures/should-not-crash.clj b/src/targets/clojure/clj_http/fixtures/should-not-crash.clj
@@ -0,0 +1,4 @@
+(require '[clj-http.client :as client])
+
+(client/post "https://httpbin.org/anything" {:content-type :json
+                                             :accept :json})
