     if @.select event, '.', [ 'text', 'code', ]
       is_comment                  = yes
       [ type, name, text, meta, ] = event
-      debug '©lP6sz', text.split @XXX_html_comment_id_pattern
       for stretch in text.split @XXX_html_comment_id_pattern
         is_comment = not is_comment
         if is_comment

          throw new Error "unknown ID #{rpr stretch}" unless comment?
          send [ '.', 'comment', comment, ( @copy meta ), ]
        else
          send [ type, name, stretch, ( @copy meta ), ]
    #.......................................................................................................
    else
      send event

          fence = left_fence ? right_fence
          send [ fence, command_name, null, ( @copy meta ), ]
        else
          send [ type, name, stretch, ( @copy meta ), ] unless stretch.length is 0
    #.......................................................................................................
    else
      send event
