makeVoidElement :: Text -> Markup p ()
makeVoidElement name = Markup $ \i attr -> MarkupStep
  { msGlobalId = i
  , msChildren = (:) (VoidNode name (V.fromList attr))
  , msResult = ()
  }
makeVoidElement :: Text -> Markup p ()
makeVoidElement name = Markup $ \i attr -> MarkupStep
  { msGlobalId = i
  , msChildren = (:) (VoidNode name (V.fromList attr))
  , msResult = ()
  }
makeVoidElement name = Markup $ \i attr -> MarkupStep
  { msGlobalId = i
  , msChildren = (:) (VoidNode name (V.fromList attr))
  , msResult = ()
  }