From 18550cd297a22b18f43c11b79a9a605af16b6773 Mon Sep 17 00:00:00 2001
From: Joel Kaasinen <joel.kaasinen@metosin.fi>
Date: Mon, 22 Apr 2024 09:03:17 +0300
Subject: [PATCH] test: add response schema to
 reitit.swagger-test/malli-var-test

---
 test/cljc/reitit/swagger_test.clj | 23 +++++++++++++++--------
 1 file changed, 15 insertions(+), 8 deletions(-)

diff --git a/test/cljc/reitit/swagger_test.clj b/test/cljc/reitit/swagger_test.clj
index fc8130e25..7c215ed68 100644
--- a/test/cljc/reitit/swagger_test.clj
+++ b/test/cljc/reitit/swagger_test.clj
@@ -513,6 +513,7 @@
 (def Plus [:map
            [:x #'X]
            [:y #'Y]])
+(def Result [:map [:result :int]])
 
 (deftest malli-var-test
   (let [app (ring/ring-handler
@@ -520,11 +521,12 @@
               [["/post"
                 {:post {:coercion malli/coercion
                         :parameters {:body #'Plus}
+                        :responses {200 {:body #'Result}}
                         :handler identity}}]
                ["/get"
                 {:get {:coercion malli/coercion
-                       :parameters {:query
-                                    #'Plus}
+                       :parameters {:query #'Plus}
+                       :responses {200 {:body #'Result}}
                        :handler identity}}]
                ["/swagger.json"
                 {:get {:no-doc true
@@ -537,15 +539,18 @@
                           "reitit.swagger-test/X" {:format "int64",
                                                    :type "integer"},
                           "reitit.swagger-test/Y" {:format "int64",
-                                                   :type "integer"}},
+                                                   :type "integer"},
+                          "reitit.swagger-test/Result" {:type "object",
+                                                        :properties {:result {:type "integer", :format "int64"}},
+                                                        :required [:result]}},
             :paths {"/post" {:post {:parameters [{:description "",
                                                   :in "body",
                                                   :name "body",
                                                   :required true,
-                                                  :schema {:$ref "#/definitions/reitit.swagger-test~1Plus"}}],
-                                    :responses {:default {:description ""}}}}
-                    "/get" {:get {:responses {:default {:description ""}}
-                                  :parameters [{:in "query"
+                                                  :schema {:$ref "#/definitions/reitit.swagger-test~1Plus"}}]
+                                    :responses {200 {:description ""
+                                                     :schema {:$ref "#/definitions/reitit.swagger-test~1Result"}}}}}
+                    "/get" {:get {:parameters [{:in "query"
                                                 :name :x
                                                 :description ""
                                                 :type "integer"
@@ -556,7 +561,9 @@
                                                 :description ""
                                                 :type "integer"
                                                 :required true
-                                                :format "int64"}]}}}
+                                                :format "int64"}]
+                                  :responses {200 {:description ""
+                                                   :schema {:$ref "#/definitions/reitit.swagger-test~1Result"}}}}}}
             :swagger "2.0",
             :x-id #{:reitit.swagger/default}}
            spec))))