GNU Info

(texi2html.info)CustPagePageHeadToc

---

Up: CustPageMiscPage

---

Enter node , (file) or (file)node

Table Of Contents
-----------------

   The following code is the original code out of the initialization
file (Note: Initialization file.).

     sub T2H_DEFAULT_print_toc_frame
     {
       my $fh = shift;
       &$T2H_print_page_head($fh);
       print $fh <<EOT;
     <H2>Content</H2>
     EOT
       print $fh map {s/HREF=/target=\"main\" HREF=/; $_;} @stoc_lines;
       print $fh "</BODY></HTML>\n";
     }

   As you can see it is very simple Perl Code, which can be changed
more or less simple to fit you requirements (Note:
T2H_DEFAULT_print_page_head.).