From fb6499fd9c655ccbd2721e80014118c8c72ce669 Mon Sep 17 00:00:00 2001
From: Fred Drake <fdrake@acm.org>
Date: Fri, 26 Oct 2001 14:16:23 +0000
Subject: [PATCH] Clean up the tables of child links generated by stock
 LaTeX2HTML so we get consistent (lack of) vertical space between sections,
 and remove some of the unnecessary cruft that was added in (finally we get to
 *remove* something that got generated!).

---
 Doc/perl/l2hinit.perl | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index 35c1d8bf7f8..61c2ff17912 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -182,6 +182,14 @@ sub make_nav_panel {
     return $s;
 }
 
+sub add_child_links {
+    my $toc = add_real_child_links(@_);
+    $toc =~ s|\s*</[aA]>|</a>|g;
+    $toc =~ s/ NAME=\"tex2html\d+\"\s*href=/ href=/gi;
+    $toc =~ s|</UL>(\s*<BR>)?|</ul>|gi;
+    return $toc;
+}
+
 sub get_version_text {
     if ($PACKAGE_VERSION ne '' && $t_date) {
         return ("<span class=\"release-info\">"