diff --git a/reflex-dom-colonnade/src/Reflex/Dom/Colonnade.hs b/reflex-dom-colonnade/src/Reflex/Dom/Colonnade.hs
index 5d6d7e6..1d52dcc 100644
--- a/reflex-dom-colonnade/src/Reflex/Dom/Colonnade.hs
+++ b/reflex-dom-colonnade/src/Reflex/Dom/Colonnade.hs
@@ -24,7 +24,7 @@ basic :: (MonadWidget t m, Foldable f)
       -> m ()
 basic tableAttrs as (Encoding v) = do
   elAttr "table" tableAttrs $ do
-    el "thead" $ forM_ v $ \(Headed (Cell attrs contents),_) ->
+    el "thead" $ el "tr" $ forM_ v $ \(Headed (Cell attrs contents),_) ->
       elAttr "th" attrs contents
     el "tbody" $ forM_ as $ \a -> do
       el "tr" $ forM_ v $ \(_,encode) -> do
@@ -38,7 +38,7 @@ dynamic :: (MonadWidget t m, Foldable f)
         -> m ()
 dynamic tableAttrs as (Encoding v) = do
   elAttr "table" tableAttrs $ do
-    el "thead" $ forM_ v $ \(Headed (Cell attrs contents),_) ->
+    el "thead" $ el "tr" $ forM_ v $ \(Headed (Cell attrs contents),_) ->
       elAttr "th" attrs contents
     el "tbody" $ forM_ as $ \a -> do
       el "tr" $ forM_ v $ \(_,encode) -> do