Clojurians Log v2

Is it intended that when using coercion (-> req :body :parameters) and (-> req :body-params) differ? I was a bit surprised that the coerced data was only in (-> req :body :parameters) .

(ns user)

(comment
  (add-lib 'metosin/reitit)
  (require '[muuntaja.core :as muu]
           '[reitit.ring :as ring]
           '[reitit.coercion.malli :as rcm]
           '[reitit.ring.coercion :as rrc]
           '[reitit.ring.middleware.muuntaja :as rrmm]
           '[jsonista.core :as j])


    (def app
      (ring/ring-handler
       (ring/router
        [["/set"
          {:post {:parameters {:body {:x [:set [:int]]}}
                  :responses {200 {:body {:total int?}}}
                  :handler (fn [{{{:keys [x]} :body} :parameters :as req}]
                             (println ":parameters :body" (-> req :parameters :body))
                             (println ":body-params" (-> req :body-params))
                             {:status 200
                              :body {:total (apply + x)}})}}]]
        {:data {:muuntaja muu/instance
                :coercion rcm/coercion
                :middleware [rrmm/format-middleware
                             rrc/coerce-exceptions-middleware
                             rrc/coerce-request-middleware
                             rrc/coerce-response-middleware]}})))

  (-> {:request-method :post
       :uri "/set"
       :headers {"content-type" "application/json"
                 "accept" "application/json"}
       :body (java.io.ByteArrayInputStream. (j/write-value-as-bytes {:x #{1 2 3}}))}
      app :body slurp j/read-value)
  ;; :parameters :body {:x #{1 3 2}}
  ;; :body-params {:x [1 3 2]}
  ;; => {"total" 6}

  ,)