diff options
author | Fred Drake <fdrake@acm.org> | 2003-09-04 22:16:45 (GMT) |
---|---|---|
committer | Fred Drake <fdrake@acm.org> | 2003-09-04 22:16:45 (GMT) |
commit | 0739c44bbd0972b65a549b246dc38e41a1e9711b (patch) | |
tree | 59759e893c097e8c4522c54c8c0c5c521c39a270 | |
parent | ecbfceb31c38b7736fa19a7fe8b3f1158254b41d (diff) | |
download | cpython-0739c44bbd0972b65a549b246dc38e41a1e9711b.zip cpython-0739c44bbd0972b65a549b246dc38e41a1e9711b.tar.gz cpython-0739c44bbd0972b65a549b246dc38e41a1e9711b.tar.bz2 |
Suppress more online-only navigation in the printed HTML.
-rw-r--r-- | Doc/html/style.css | 2 | ||||
-rw-r--r-- | Doc/perl/l2hinit.perl | 22 |
2 files changed, 15 insertions, 9 deletions
diff --git a/Doc/html/style.css b/Doc/html/style.css index bd79427..70cc235 100644 --- a/Doc/html/style.css +++ b/Doc/html/style.css @@ -146,5 +146,5 @@ div.note .label { margin-right: 0.5em; * Some specialization for printed output. */ @media print { - #bottom-navigation-panel { display: none; } + .online-navigation { display: none; } } diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl index 41b2f94..4748b8c 100644 --- a/Doc/perl/l2hinit.perl +++ b/Doc/perl/l2hinit.perl @@ -26,7 +26,7 @@ $BOTTOM_NAVIGATION = 1; $AUTO_NAVIGATION = 0; $BODYTEXT = ''; -$CHILDLINE = "\n<p></p><hr />\n"; +$CHILDLINE = "\n<p><br /></p><hr class='online-navigation' />\n"; $VERBOSITY = 0; # default # of columns for the indexes @@ -180,20 +180,23 @@ sub make_nav_panel() { $s = ('<table align="center" width="100%" cellpadding="0" cellspacing="2">' . "\n<tr>" # left-hand side - . "\n<td>$PREVIOUS</td>" - . "\n<td>$UP</td>" - . "\n<td>$NEXT</td>" + . "\n<td class='online-navigation'>$PREVIOUS</td>" + . "\n<td class='online-navigation'>$UP</td>" + . "\n<td class='online-navigation'>$NEXT</td>" # title box . "\n<td align=\"center\" width=\"100%\">$t_title</td>" # right-hand side - . "\n<td>$CONTENTS</td>" - . "\n<td>$CUSTOM_BUTTONS</td>" # module index - . "\n<td>$INDEX</td>" + . "\n<td class='online-navigation'>$CONTENTS</td>" + # module index + . "\n<td class='online-navigation'>$CUSTOM_BUTTONS</td>" + . "\n<td class='online-navigation'>$INDEX</td>" . "\n</tr></table>\n" # textual navigation + . "<div class='online-navigation'>\n" . make_nav_sectref("Previous", "prev", $PREVIOUS_TITLE) . make_nav_sectref("Up", "parent", $UP_TITLE) . make_nav_sectref("Next", "next", $NEXT_TITLE) + . "</div>\n" ); # remove these; they are unnecessary and cause errors from validation $s =~ s/ NAME="tex2html\d+"\n */ /g; @@ -205,6 +208,9 @@ sub add_child_links { $toc =~ s|\s*</[aA]>|</a>|g; $toc =~ s/ NAME=\"tex2html\d+\"\s*href=/ href=/gi; $toc =~ s|</UL>(\s*<BR( /)?>)?|</ul>|gi; + if ($toc =~ / NAME=["']CHILD_LINKS["']/) { + return "<div class='online-navigation'>\n$toc</div>\n"; + } return $toc; } @@ -233,7 +239,7 @@ sub top_navigation_panel() { } sub bot_navigation_panel() { - return "\n<div id='bottom-navigation-panel'>\n" + return "\n<div class='online-navigation'>\n" . "<p></p><hr />\n" . make_nav_panel() . "</div>\n" |