bash-3.2/support/texi2html

49             Karl Berry  <karl\@freefriends.org>
203 # uses file of this name for top-level file
676 # Last     -- last node
747 # @html within the Top texinfo node to specify content of top-level
776     # if top-level node has content, then print it with extra header
783     # top-level node is fully enclosed in @ifnothtml
852 # chapter_footer: after print_section of last section, before print_page_footer
1275    'Prev',     'previous section same level',
1277    'Next',     'next section same level',
1282    'Last',     'last section in reading order',
1469 1;	# This must be the last non-comment line
1802 # texinfo section names to level
2724 	  last;
2945 $curlevel = 0;				# current level in TOC
3113       last if $tag eq 'bye';
3342 	    local ($sec, $level);
3343 	    while (($sec, $level) = each %sec2level) {
3344 		$sec2level{$sec} = $level + 1;
3348 	    local ($sec, $level);
3349 	    while (($sec, $level) = each %sec2level) {
3350 		$sec2level{$sec} = $level - 1;
3565 		$level = $sec2level{$tag};
3568 		  if ($level == 1 && !$first_index_chapter &&
3572                     $_ = &debug("<H$level>$name</H$level>\n", __LINE__);
3574 		    print "# top heading, section $name, level $level\n"
3583 		      my $number = &update_sec_num($tag, $level);
3590 		      push @lines, ($level==$toplevel ? $CHAPTEREND : $SECTIONEND);
3595 		      unless ($level == 1)
3597 			warn "$WARN The first section found is not of level 1: $_";
3599 		      $toplevel = $level;
3603 				   $T2H_SPLIT && $level == $toplevel);
3630 		  print "# node $node, section $name, level $level\n"
3640 		    while ($level > $curlevel) {
3644 		    while ($level < $curlevel) {
3650 		    push(@stoc_lines, "$_<BR>\n") if ($level == 1);
3668 		  $_ =  "<H$level> $name </H$level>\n<!--docid::${docid}::-->\n";
3775 $level = 0;
3776 while ($level < $curlevel) {
4362 			last;
4390 $end_of_para = 0;			# true if last line is <P>
4416 		last;
4517     last if /$TOPEND/;
4733     last if ($_ eq $SECTIONEND || $_ eq $CHAPTEREND);
4829 # Low level functions                                                          #
4855     local($name, $level) = @_;
4858     $level--; # here we start at 0
4862 	    &incr_sec_num($level, @appendix_sec_num);
4866 	$ret = join('.', @appendix_sec_num[0..$level]);
4871 	  &incr_sec_num($level, @normal_sec_num);
4877 	$ret = join('.', @normal_sec_num[0..$level]);
4880     $ret .= "." if $level == 0;
4885     local($level, $l);
4886     $level = shift(@_);
4887     $_[$level]++;
4888     foreach $l ($level+1 .. 3) {
5085 		last;