*** search_cvs.pl	Fri Jul  5 09:55:34 2002
--- search.pl	Fri Jul  5 09:55:30 2002
***************
*** 200,209 ****
    my $color = shift;
    my $content_new = "";
    my @comments = split(/(<!--.*?-->)/igs, $content);
    foreach my $c (@comments) {
      my @tags = split(/(<.*?>)/igs, $c);
      foreach my $part (@tags) {
!       if( $part !~ m/^</ ) {
          $part = normalize_special_chars($part);
          $part =~ s/\b($term)\b/<highlight>$1<\/highlight>/igs;
          # repair possibly damaged entities:
--- 200,212 ----
    my $color = shift;
    my $content_new = "";
    my @comments = split(/(<!--.*?-->)/igs, $content);
+   my $in_ignore = 0;
    foreach my $c (@comments) {
      my @tags = split(/(<.*?>)/igs, $c);
      foreach my $part (@tags) {
!       $in_ignore = 1 if $part =~ /$IGNORE_TEXT_START/;
!       $in_ignore = 0 if $part =~ /$IGNORE_TEXT_END/;
!       if( $part !~ m/^</ && !$in_ignore ) {
          $part = normalize_special_chars($part);
          $part =~ s/\b($term)\b/<highlight>$1<\/highlight>/igs;
          # repair possibly damaged entities: