diff options
| author | Fred Drake <fdrake@acm.org> | 1999-04-29 19:06:56 (GMT) |
|---|---|---|
| committer | Fred Drake <fdrake@acm.org> | 1999-04-29 19:06:56 (GMT) |
| commit | a00754468fc9be47636a3fb06f6f14f4ecbf9095 (patch) | |
| tree | 3d374c66139db14dfc84d4eef79662393b845887 /Doc/perl/l2hinit.perl | |
| parent | 50c507e4b4d082323fefd393604f43f0cbe8871b (diff) | |
| download | cpython-a00754468fc9be47636a3fb06f6f14f4ecbf9095.zip cpython-a00754468fc9be47636a3fb06f6f14f4ecbf9095.tar.gz cpython-a00754468fc9be47636a3fb06f6f14f4ecbf9095.tar.bz2 | |
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.
Diffstat (limited to 'Doc/perl/l2hinit.perl')
| -rw-r--r-- | Doc/perl/l2hinit.perl | 34 |
1 files changed, 18 insertions, 16 deletions
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl index 8d737c0..cd81c0a 100644 --- 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 { |