diff options
author | Fred Drake <fdrake@acm.org> | 2000-07-31 20:13:23 (GMT) |
---|---|---|
committer | Fred Drake <fdrake@acm.org> | 2000-07-31 20:13:23 (GMT) |
commit | 4640e13259d50b754c1e0ea39b05559b3cd18cc3 (patch) | |
tree | 84d6551d6afdc4a057b22786ca94fc03e6b65110 /Doc/perl | |
parent | 3d83fc3ab15f8b57181bbe6803c592bb39b1fc25 (diff) | |
download | cpython-4640e13259d50b754c1e0ea39b05559b3cd18cc3.zip cpython-4640e13259d50b754c1e0ea39b05559b3cd18cc3.tar.gz cpython-4640e13259d50b754c1e0ea39b05559b3cd18cc3.tar.bz2 |
Change as suggested by Peter Funk <pf@artcom-gmbh.de>:
Move around the navigational links on the left-hand side of the navigation
bar to be more like the cursor keys.
Diffstat (limited to 'Doc/perl')
-rw-r--r-- | Doc/perl/l2hinit.perl | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl index 2327921..bd85f68 100644 --- a/Doc/perl/l2hinit.perl +++ b/Doc/perl/l2hinit.perl @@ -148,9 +148,9 @@ sub make_nav_panel { $s = ('<table align="center" width="100%" cellpadding="0" cellspacing="2">' . "\n<tr>" # left-hand side - . "\n<td>$NEXT</td>" - . "\n<td>$UP</td>" . "\n<td>$PREVIOUS</td>" + . "\n<td>$UP</td>" + . "\n<td>$NEXT</td>" # title box . "\n<td align=\"center\"$NAV_BGCOLOR width=\"100%\">" . "\n <b class=\"title\">$t_title</b></td>" @@ -160,9 +160,10 @@ sub make_nav_panel { . "\n<td>$INDEX</td>" . "\n</tr></table>\n" # textual navigation - . make_nav_sectref("Next", $NEXT_TITLE) + . make_nav_sectref("Previous", $PREVIOUS_TITLE) . make_nav_sectref("Up", $UP_TITLE) - . make_nav_sectref("Previous", $PREVIOUS_TITLE)); + . make_nav_sectref("Next", $NEXT_TITLE) + ); # remove these; they are unnecessary and cause errors from validation $s =~ s/ NAME="tex2html\d+"\n */ /g; return $s; |