                              :on-tab-click #(om/update! data :selected-tab-name %)})
           "Selected: " (str selected-tab-name)])))
 
-  (defcard tab-row-with-icon
+  (defcard-om tab-row-with-icon
     "This `tab-row` features icons on the tab labels."
-    (om-root tab-row-with-icon-parent)
+    tab-row-with-icon-parent
     {:selected-tab-name :tab-one}))

                             :on-tab-click #(om/update! data :selected-tab-name %)})
          "Selected: " (str selected-tab-name)])))

  (defcard tab-row
    "Here, a parent renders a `tab-row`. Note that the `tab-row` itself does not
    track which tab is selected as state. Instead, the parent tells the tab row
    which tab is selected. It's the parent's responsibility to listen to the

             [:span.tab-icon icon])
           [:span.tab-label label]])]))))

(dc/do
  (defn tab-row-parent [{:keys [selected-tab-name] :as data} owner]
    (om/component
        (html
