Imported from ../bash-4.0-rc1.tar.gz.

[thirdparty/bash.git] / support / texi2html

diff --git a/support/texi2html b/support/texi2html
index bdb3bee33437bd270f3dd9b129e85715f19b6f78..13b55884c34c1c37a4107661b53e922d4c365ceb 100755 (executable)
--- a/support/texi2html
+++ b/support/texi2html
@@ -7,20 +7,19 @@
 #
 #    Copyright (C) 1999, 2000  Free Software Foundation, Inc.
 #
-#    This program is free software; you can redistribute it and/or modify
-#    it under the terms of the GNU General Public License as published by
-#    the Free Software Foundation; either version 2 of the License, or
-#    (at your option) any later version.
+#   This program is free software: you can redistribute it and/or modify
+#   it under the terms of the GNU General Public License as published by
+#   the Free Software Foundation, either version 3 of the License, or
+#   (at your option) any later version.
 #
-#    This program is distributed in the hope that it will be useful,
-#    but WITHOUT ANY WARRANTY; without even the implied warranty of
-#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#    GNU General Public License for more details.
+#   This program is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#   GNU General Public License for more details.
+#
+#   You should have received a copy of the GNU General Public License
+#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
 #
-#    You should have received a copy of the GNU General Public License
-#    along with this program; if not, write to the Free Software
-#    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-# 
 #-##############################################################################
 
 # This requires perl version 5 or higher
@@ -3564,7 +3563,7 @@ INPUT_LINE: while ($_ = &next_line) {
                $name = &normalise_node($name);
                $level = $sec2level{$tag};
                # check for index
-               $first_index_chapter = $name
+               $first_index_chapter = $node
                  if ($level == 1 && !$first_index_chapter && 
                      $name =~ /index/i);
                if ($in_top && /heading/){