diff options
| author | Fred Drake <fdrake@acm.org> | 2000-09-16 20:40:44 (GMT) |
|---|---|---|
| committer | Fred Drake <fdrake@acm.org> | 2000-09-16 20:40:44 (GMT) |
| commit | 1681627ebf22bbe3155949ca8411d4dca4169d44 (patch) | |
| tree | 297e16fa5c0b2dd80ba80693d84a4f7b5ec9b010 /Doc/perl | |
| parent | acff0b3f3b97584ab9e2da923eb0041f6cc99ed3 (diff) | |
| download | cpython-1681627ebf22bbe3155949ca8411d4dca4169d44.zip cpython-1681627ebf22bbe3155949ca8411d4dca4169d44.tar.gz cpython-1681627ebf22bbe3155949ca8411d4dca4169d44.tar.bz2 | |
Push more of the display control into the style sheet.
Diffstat (limited to 'Doc/perl')
| -rw-r--r-- | Doc/perl/l2hinit.perl | 6 |
1 files changed, 3 insertions, 3 deletions
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 |