texinfo/tp TODO Texinfo/Convert/HTML.pm

[Patrice Dumas]

CVSROOT:        /sources/texinfo
Module name:    texinfo
Changes by:     Patrice Dumas <pertusus>        11/11/04 00:09:27

Modified files:
        tp             : TODO 
        tp/Texinfo/Convert: HTML.pm 

Log message:
        Really change the headings of separate elements.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/TODO?cvsroot=texinfo&r1=1.210&r2=1.211
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Texinfo/Convert/HTML.pm?cvsroot=texinfo&r1=1.202&r2=1.203

Patches:
Index: TODO
===================================================================
RCS file: /sources/texinfo/texinfo/tp/TODO,v
retrieving revision 1.210
retrieving revision 1.211
diff -u -b -r1.210 -r1.211
--- TODO        3 Nov 2011 23:54:49 -0000       1.210
+++ TODO        4 Nov 2011 00:09:27 -0000       1.211
@@ -100,6 +100,8 @@
 
 test empty line in block or brace command in menu description.
 
+in html test footnotestyle separate.
+
 
 Future features
 ===============

Index: Texinfo/Convert/HTML.pm
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Texinfo/Convert/HTML.pm,v
retrieving revision 1.202
retrieving revision 1.203
diff -u -b -r1.202 -r1.203
--- Texinfo/Convert/HTML.pm     3 Nov 2011 23:54:49 -0000       1.202
+++ Texinfo/Convert/HTML.pm     4 Nov 2011 00:09:27 -0000       1.203
@@ -3292,10 +3292,6 @@
         = $self->convert_tree 
($self->get_conf('SPECIAL_ELEMENTS_NAME')->{$element_name});
     }
     my $class = $self->get_conf('SPECIAL_ELEMENTS_CLASS')->{$element_name};
-    my $level = $self->get_conf('CHAPTER_HEADER_LEVEL');
-    if ($element_name eq 'Footnotes') {
-      $level = $self->get_conf('FOOTNOTE_SEPARATE_HEADER_LEVEL');
-    }
     $result .= &{$self->{'format_heading_text'}}($self, $class.'-heading', 
                        $heading, $self->get_conf('CHAPTER_HEADER_LEVEL'))."\n";
     $result .= $content . "\n";
@@ -4019,8 +4015,12 @@
     my $heading = $self->command_text($element);
     my $element_name = $element->{'extra'}->{'special_element'};
     my $class = $self->get_conf('SPECIAL_ELEMENTS_CLASS')->{$element_name};
+    my $level = $self->get_conf('CHAPTER_HEADER_LEVEL');
+    if ($element_name eq 'Footnotes') {
+      $level = $self->get_conf('FOOTNOTE_SEPARATE_HEADER_LEVEL');
+    }
     $result .= &{$self->{'format_heading_text'}}($self, $class.'-heading', 
-                       $heading, $self->get_conf('CHAPTER_HEADER_LEVEL'))."\n";
+                       $heading, $level)."\n";
 
     my $special_element_body .= 
&{$self->{'format_special_element_body'}}($self, 
                                                  $special_element, $element);