From 295a22199dd899968027df58fa3f37dc28b8b874 Mon Sep 17 00:00:00 2001
From: Ambrose Bonnaire-Sergeant <ambonnai@cisco.com>
Date: Thu, 11 Apr 2024 11:55:36 -0500
Subject: [PATCH] opts

---
 src/ring/swagger/json_schema.clj | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/ring/swagger/json_schema.clj b/src/ring/swagger/json_schema.clj
index fdffc71..9dba61e 100644
--- a/src/ring/swagger/json_schema.clj
+++ b/src/ring/swagger/json_schema.clj
@@ -143,7 +143,7 @@
        (merge-meta x options))))
 
 (defn- try->swagger [v k key-meta opts]
-  (try (->swagger v {:key-meta key-meta ::schema-type (opts->schema-type opts)})
+  (try (->swagger v (assoc opts :key-meta key-meta))
        (catch Exception e
          (throw
            (IllegalArgumentException.
@@ -288,7 +288,7 @@
    {:pre [(common/plain-map? schema)]}
    (if-let [extra-key (s/find-extra-keys-schema schema)]
      (let [v (get schema extra-key)]
-       (try->swagger v s/Keyword nil (opts->schema-type opts)))
+       (try->swagger v s/Keyword nil opts))
      false)))
 
 (defn schema-object