   (reify
     om/IRenderState
     (render-state [_ state]
-      (dom/div nil elem))))
+      (dom/span #js {:className "xml-text-element"} elem))))
 
 (defmethod element-component :elem [elem owner]
   (reify

           (apply dom/div #js {:className "block-contents col-md-10"}
             (om/build-all element-component (:content elem)))))))))

(defmethod element-component :wtf [elem owner]
  (reify
    om/IRender

                                 (and
                                   (contains? val :content)
                                   (contains? val :tag))
                                 (let [el-type (get-in mk/markup [(:tag val) :type])]
                                   (cond
                                     (#{:container :multi-chunk :chunk} el-type)
                                     :elem

                                     (= :inner el-type)
                                     :inner-elem

                                     (= :empty el-type)
                                     :empty-elem))

                                 true
                                 :wtf))))
