-(defmethod present-slot ((slot inline-slot-presentation) instance)
- (<:fieldset
- (<:legend (<:as-html (label slot)))
- (<ucw:render-component :component (mewa:make-presentation (meta-model::explode-foreign-key instance (slot-name slot)) :type :editor))))