               else send_unknown token, meta
           #.................................................................................................
           when 'html_inline'
-            [ position, name, extra, ] = @_parse_html_tag token[ 'content' ]
-            # debug '44647', name, extra; xxx
+            [ position, name, extra, ]  = @_parse_html_tag token[ 'content' ]
+            meta.markup                 = token[ 'content' ]
             switch position
               when 'comment'
                 send [ '.', 'comment', extra.trim(), meta, ]

    return [ 'end', match[ 1 ], ]
  if ( match = source.match @_parse_html_tag.comment_pattern )?
    return [ 'comment', 'comment', match[ 1 ], ]
  return @_parse_html_open_tag source
@_parse_html_tag.close_tag_pattern   = /^<\/([^>]+)>$/
@_parse_html_tag.comment_pattern     = /^<!--([\s\S]*)-->$/


#===========================================================================================================

  _resolve_html_attributes = ( facets ) ->
    assign {}, ( { "#{facet.name}": ( _cast_attribute_value facet.value ) } for facet in facets )...
  #.........................................................................................................
  R[ '_parse_html_open_or_lone_tag' ] = ( source ) ->
    if is_lone_tag = source.endsWith '/>'
      position  = 'lone'
      source    = source[ ... source.length - 2 ] + '>'
    else
      position  = 'begin'
    tree    = PARSE5.parseFragment source
    throw new Error get_message source unless ( cns = tree[ 'childNodes' ] ).length is 1
    cn = cns[ 0 ]
    throw new Error get_message source unless cn[ 'childNodes' ]?.length is 0
    return [ position, cn[ 'tagName' ], ( _resolve_html_attributes cn[ 'attrs' ] ), ]
    # return [ 'begin', cn[ 'tagName' ], cn[ 'attrs' ][ 0 ] ? {}, ]
  #.........................................................................................................
  R[ '_parse_html_block' ] = ( source ) ->
