make_nav_panel(): Remove the spurious NAME="tex2html\d+" attributes

		   added to the anchors in the navigation bars.  These
		   are added somewhere deep with l2h, and are stupid.

diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index 8d737c0ee44d19da80d1030a1db49d4996738f71..cd81c0a876da79dab035f682c1d7a3b3eb723c51 100644 (file)
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -122,22 +122,24 @@ sub make_nav_sectref{
 }
 
 sub make_nav_panel{
-    return ("<table align=center width=\"100%\" cellpadding=0 cellspacing=2>"
-           . "\n<tr>"
-           . "\n<td>$NEXT</td>"
-           . "\n<td>$UP</td>"
-           . "\n<td>$PREVIOUS</td>"
-           . "\n<td align=center$NAV_BGCOLOR width=\"100%\">"
-           . "\n <b class=title>$t_title</b></td>"
-           . ($CONTENTS ? "\n<td>$CONTENTS</td>" : $BLANK_ICON)
-           . "\n<td>$CUSTOM_BUTTONS</td>" # module index
-           . ($INDEX ? "\n<td>$INDEX</td>" : $BLANK_ICON)
-           . "\n</tr></table>"
-           #. "<hr>"
-           . make_nav_sectref("Next", $NEXT_TITLE)
-           . make_nav_sectref("Up", $UP_TITLE)
-           . make_nav_sectref("Previous", $PREVIOUS_TITLE)
-          );
+    my $s;
+    $s = "<table align=center width=\"100%\" cellpadding=0 cellspacing=2>"
+         . "\n<tr>"
+        . "\n<td>$NEXT</td>"
+        . "\n<td>$UP</td>"
+        . "\n<td>$PREVIOUS</td>"
+        . "\n<td align=center$NAV_BGCOLOR width=\"100%\">"
+        . "\n <b class=title>$t_title</b></td>"
+        . ($CONTENTS ? "\n<td>$CONTENTS</td>" : $BLANK_ICON)
+        . "\n<td>$CUSTOM_BUTTONS</td>" # module index
+        . ($INDEX ? "\n<td>$INDEX</td>" : $BLANK_ICON)
+        . "\n</tr></table>"
+        #. "<hr>"
+        . make_nav_sectref("Next", $NEXT_TITLE)
+        . make_nav_sectref("Up", $UP_TITLE)
+        . make_nav_sectref("Previous", $PREVIOUS_TITLE);
+    $s =~ s/ NAME="tex2html\d+"\n//g;
+    return $s;
 }
 
 sub top_navigation_panel {