diff --git a/modules/reitit-core/src/reitit/coercion.cljc b/modules/reitit-core/src/reitit/coercion.cljc index ca8cf0fd..75b78d79 100644 --- a/modules/reitit-core/src/reitit/coercion.cljc +++ b/modules/reitit-core/src/reitit/coercion.cljc @@ -176,9 +176,9 @@ (some->> (for [[k v] parameters, :when v] [k (request-coercer coercion k v opts)]) (filter second) (seq) (into {}))) - ([coercion parameters request opts] - (let [crc (when request (some->> (content-request-coercer coercion request opts) (array-map :request))) - rcs (request-coercers coercion parameters (cond-> opts request (assoc ::skip #{:body})))] + ([coercion parameters route-request opts] + (let [crc (when route-request (some->> (content-request-coercer coercion route-request opts) (array-map :request))) + rcs (request-coercers coercion parameters (cond-> opts route-request (assoc ::skip #{:body})))] (if (and crc rcs) (into crc (vec rcs)) (or crc rcs))))) (defn response-coercers [coercion responses opts] diff --git a/modules/reitit-spec/src/reitit/coercion/spec.cljc b/modules/reitit-spec/src/reitit/coercion/spec.cljc index b988d140..98ff9e37 100644 --- a/modules/reitit-spec/src/reitit/coercion/spec.cljc +++ b/modules/reitit-spec/src/reitit/coercion/spec.cljc @@ -83,9 +83,6 @@ :string {:default string-transformer} :response {:default no-op-transformer}}}) -(defn get-request-default-body [request] - (or (-> request :content :default :schema) (:body request))) - (defn create [{:keys [transformers coerce-response?] :as opts}] ^{:type ::coercion/coercion} (reify coercion/Coercion