     [:pre (with-out-str
             (pprint item))]]))
 
-;; TODO move to webutil - how to handle call to ->shallow-kebab-map?
 (defmulti decode-body :content-type :default "application/json")
 
 (defmethod decode-body "application/json" [{body :body}] (some-> body read-json-body ->shallow-kebab-map))

                                                    :name name}))]
      {::item item}
      #_(throw (ex-info (format "Cannot find item of id %s")))))
  :post! (fn [{{{:keys [entity-id name]} :route-params :as request} :request}]
           (let [{:keys [members name]} (decode-body request)
                 ds {:entity_id entity-id
                     :name name
                     :members (string/join \, members)}]


  :post!
  (fn [{request :request}]
    (let [body          (-> request :body)
          entity        (-> body read-json-body ->shallow-kebab-map)
          project-id    (-> entity :project-id)
          property-code (-> entity :property-code)]
      (when (and project-id property-code)
