diff options
| -rw-r--r-- | Doc/html/style.css | 7 | ||||
| -rw-r--r-- | Doc/perl/l2hinit.perl | 6 |
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 |