summaryrefslogtreecommitdiffstats
path: root/Doc/perl/l2hinit.perl
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>2002-03-22 17:22:38 (GMT)
committerFred Drake <fdrake@acm.org>2002-03-22 17:22:38 (GMT)
commitcf43004b837125cd20cb01c8153860eafe7d4c92 (patch)
treeacfdad434fbf49f350879737d9da8f5eb7fd7fe8 /Doc/perl/l2hinit.perl
parent9d50d138e704489026e26f2b335a3d7b1054a3e8 (diff)
downloadcpython-cf43004b837125cd20cb01c8153860eafe7d4c92.zip
cpython-cf43004b837125cd20cb01c8153860eafe7d4c92.tar.gz
cpython-cf43004b837125cd20cb01c8153860eafe7d4c92.tar.bz2
Fix broken HTML in the head; this was reported by a user as causing Opera 6.01
to crash. The user has reported the problem to Opera, but we still should generate something that passes for HTML.
Diffstat (limited to 'Doc/perl/l2hinit.perl')
-rw-r--r--Doc/perl/l2hinit.perl2
1 files changed, 1 insertions, 1 deletions
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index 19f0232..7a3aeeb 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -613,7 +613,7 @@ sub make_head_and_body {
$MY_PARTIAL_HEADER = join('',
($CHARSET && $HTML_VERSION ge "2.1"
? ('<meta http-equiv="Content-Type" content="text/html; '
- . "charset=$charset\">\n")
+ . "charset=$CHARSET\">\n")
: ''),
($BASE ? "<base href=\"$BASE\">\n" : ''),
"<link rel=\"STYLESHEET\" href=\"$STYLESHEET\">\n",