Fix reading keys

babashka · Jan 30, 2024 · 38d7c41 · 38d7c41
1 parent 296a8f4
commit 38d7c41
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/babashka/json.clj b/src/babashka/json.clj
@@ -52,8 +52,8 @@
 
 (defn ->json-reader
   ([x] (->json-reader x nil))
-  ([x _opts]
-   (internal->json-reader x)))
+  ([x opts]
+   (internal->json-reader x opts)))
 
 (defn get-provider
   "Returns which library currently provides the JSON implementation."

diff --git a/src/babashka/json/internal/cheshire.clj b/src/babashka/json/internal/cheshire.clj
@@ -15,4 +15,4 @@
   ([reader {:keys [key-fn]}]
    (cheshire/parse-stream reader (or key-fn keyword))))
 
-(def fns ['cheshire/cheshire read-str write-str identity read])
+(def fns ['cheshire/cheshire read-str write-str (fn [x & _whatever] x) read])