   (content-length [s]
     nil)
 
-
-
   MapBody
   (to-body [mb representation]
     (to-body (:map mb) representation))

   :error error})

;; TODO: Check semantics, is this right? Shouldn't we be encoding to transit+json here?
(defmethod render-error "application/transit+json"
  [status error representation {:keys [id options]}]
  {:status status

   :error error})

;; TODO: Check semantics, is this right? Shouldn't we be encoding to json here?
;; TODO: Move to yada.json
(defmethod render-error "application/json"
  [status error representation {:keys [id options]}]
  {:status status
