summaryrefslogtreecommitdiffstats
path: root/Doc/perl
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>1999-04-29 19:06:56 (GMT)
committerFred Drake <fdrake@acm.org>1999-04-29 19:06:56 (GMT)
commita00754468fc9be47636a3fb06f6f14f4ecbf9095 (patch)
tree3d374c66139db14dfc84d4eef79662393b845887 /Doc/perl
parent50c507e4b4d082323fefd393604f43f0cbe8871b (diff)
downloadcpython-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')
-rw-r--r--Doc/perl/l2hinit.perl34
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 {