summaryrefslogtreecommitdiffstats
path: root/Doc
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>2000-09-16 20:40:44 (GMT)
committerFred Drake <fdrake@acm.org>2000-09-16 20:40:44 (GMT)
commit1681627ebf22bbe3155949ca8411d4dca4169d44 (patch)
tree297e16fa5c0b2dd80ba80693d84a4f7b5ec9b010 /Doc
parentacff0b3f3b97584ab9e2da923eb0041f6cc99ed3 (diff)
downloadcpython-1681627ebf22bbe3155949ca8411d4dca4169d44.zip
cpython-1681627ebf22bbe3155949ca8411d4dca4169d44.tar.gz
cpython-1681627ebf22bbe3155949ca8411d4dca4169d44.tar.bz2
Push more of the display control into the style sheet.
Diffstat (limited to 'Doc')
-rw-r--r--Doc/html/style.css7
-rw-r--r--Doc/perl/l2hinit.perl6
2 files changed, 10 insertions, 3 deletions
diff --git a/Doc/html/style.css b/Doc/html/style.css
index bde3ce0..0bdda92 100644
--- a/Doc/html/style.css
+++ b/Doc/html/style.css
@@ -27,6 +27,13 @@ BIG.XHUGE { font-size : xx-large }
* the normal text size.
*/
+body { color: #000000;
+ background-color: #ffffff; }
+
+a:active { color: #ff0000; }
+a:visited { color: #551a8b; }
+a:link { color: #0000bb; }
+
h1, h2, h3, h4, h5, h6 { font-family: avantgarde, sans-serif;
font-weight: bold }
h1 { font-size: 180% }
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index d78efc8..b551158 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -26,8 +26,7 @@ $BOTTOM_NAVIGATION = 1;
$AUTO_NAVIGATION = 0;
# these exactly match the python.org colors
-$BODYTEXT = ('bgcolor="#ffffff" text="#000000"'
- . ' link="#0000bb" vlink="#551a8b" alink="#ff0000"');
+$BODYTEXT = '';
$CHILDLINE = "\n<p><hr>\n";
$VERBOSITY = 0;
@@ -506,6 +505,7 @@ sub set_depth_levels {
# content of the page.
sub make_head_and_body {
my($title, $body) = @_;
+ $body = " $body" unless ($body eq '');
my $DTDcomment = '';
my($version, $isolanguage) = ($HTML_VERSION, 'EN');
my %isolanguages = ( 'english', 'EN' , 'USenglish', 'EN.US'
@@ -541,7 +541,7 @@ sub make_head_and_body {
, ($BASE ? "<base href=\"$BASE\">\n" : "" )
, "<link rel=\"STYLESHEET\" href=\"$STYLESHEET\">"
, $more_links_mark
- , "\n</head>\n<body $body>\n");
+ , "\n</head>\n<body$body>");
}
1; # This must be the last line