Lines Matching refs:aComment
359 # args: - $aComment: comment text with '<!--' and '-->' tags stripped off.
363 my ($self, $aComment) = @_;
371 $self->SUPER::comment($aComment);
377 $self->{_tokensUpdateEnd}[TUT_TOKENTYPE_COMMENT]{$aComment}
391 $self->{_tokensUpdateBegin}[TUT_TOKENTYPE_COMMENT]{$aComment}
398 $self->SUPER::comment($aComment);
404 $self->SUPER::comment($aComment);
620 # args: - $aComment: comment text with '<!--' and '-->' tags stripped off.
624 my ($self, $aComment) = @_;
626 $self->{tokens}[HTML::TocUpdator::TUT_TOKENTYPE_COMMENT]{$aComment} = '';
