--- HTML.pm.orig 2004-08-01 02:41:45.000000000 -0700 +++ HTML.pm 2004-08-01 02:46:12.000000000 -0700 @@ -1183,7 +1183,9 @@ } $pre->push_content("\n"); - if($self->{_current_head1_title} eq 'NAME' && !$self->description()) { + if(( $self->{_current_head1_title} eq 'NAME' + ||$self->{_current_head1_title} eq 'NOMBRE' + ||$self->{_current_head1_title} eq 'NOM') && !$self->description()) { # save the description for further use in TOC my $str = $paragraph; $str =~ s/^[\n\s]+//; @@ -1226,7 +1228,9 @@ if(!$self->{_begin}) { my @text = $self->interpolate($paragraph, $line_num); # remember first paragraph in NAME section - if($self->{_current_head1_title} eq 'NAME' && $paragraph && + if(( $self->{_current_head1_title} eq 'NAME' + ||$self->{_current_head1_title} eq 'NOMBRE' + ||$self->{_current_head1_title} eq 'NOM') && $paragraph && !$self->description()) { # save the description for further use in TOC $self->description([ HTML::Element->clone_list(@text) ]);