Merge pull request #19 from fukamachi/avoid-response-validate-unknown…

…-behavior Fix response-validate
cxxxr · Feb 3, 2020 · 39670ea · 39670ea
2 parents ad5967b + 55f7f3e
commit 39670ea
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/classes/response/encode.lisp b/src/classes/response/encode.lisp
@@ -109,7 +109,9 @@
                                                (media-type-schema media-type))
                                           t)))
                           (handler-case
-                              (encode-data data schema content-type)
+                              (progn
+                                ;; (encode-data data schema content-type)
+                                (validate-data data schema))
                             (body-encode-error (e)
                               (error 'response-validation-failed
                                      :value data