 
 (defmethod parse :multipart/form-data
   [^Context ctx ^TypedData body]
-  (ct/get-formdata ctx))
+  (ct/get-formdata* ctx body))
 
 (defmethod parse :application/x-www-form-urlencoded
   [^Context ctx ^TypedData body]
-  (ct/get-formdata ctx))
+  (ct/get-formdata* ctx body))
 
 (defmethod parse :application/json
   [^Context ctx ^TypedData body]

  ([parsefn]
   (fn [context]
     (let [^Context ctx (:catacumba/context context)
           ^TypedData body (.. ctx getRequest getBody)]
       (ct/delegate context {:body (parsefn ctx body)})))))

  "A polymorophic method for parse body into clojure
  friendly data structure."
  (fn [^Context ctx ^TypedData body]
    (let [^String contenttype (.. body getContentType getType)]
      (if contenttype
        (keyword (.toLowerCase contenttype))
        :application/octet-stream)))
