Diff for /doc/help/rebuildLabelHash.pl between versions 1.10 and 1.11

version 1.10, 2007/08/24 23:50:28 version 1.11, 2008/07/24 21:51:38
Line 104  foreach my $file ( glob("*.tex") ) { Line 104  foreach my $file ( glob("*.tex") ) {
     foreach my $ref ( $contents =~ /\\ref\{([^\}]*)\}/g ) {      foreach my $ref ( $contents =~ /\\ref\{([^\}]*)\}/g ) {
  if (!exists($fragmentLabels{$ref})   if (!exists($fragmentLabels{$ref})
     && $ref ne 'course.manual.access.hlp'      && $ref ne 'course.manual.access.hlp'
     && $ref ne 'author.manual.access.hlp') {      && $ref ne 'author.manual.access.hlp'
               && $ref ne 'domain.manual.access.hlp') {
     $error++;      $error++;
     print("***ERROR: ref $ref in $file doesn't exist in label hash. \n");      print("***ERROR: ref $ref in $file doesn't exist in label hash. \n");
  } else {   } else {
Line 114  foreach my $file ( glob("*.tex") ) { Line 115  foreach my $file ( glob("*.tex") ) {
 }  }
   
 use HTML::TokeParser;  use HTML::TokeParser;
 foreach my $manual ('course.manual.texxml','author.manual.texxml') {  foreach my $manual ('course.manual.texxml','author.manual.texxml','domain.manual.texxml') {
     my $p = HTML::TokeParser->new($path.'/'.$manual);      my $p = HTML::TokeParser->new($path.'/'.$manual);
     if (!-e $path.'/'.$manual) {      if (!-e $path.'/'.$manual) {
  $error++;   $error++;

Removed from v.1.10  
changed lines
  Added in v.1.11


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>