Commit 0e2e687b authored by Fred Drake's avatar Fred Drake

Minor rearranging.

parent 4e303aad
...@@ -634,6 +634,7 @@ sub make_head_and_body($$) { ...@@ -634,6 +634,7 @@ sub make_head_and_body($$) {
# . "\n" # . "\n"
# : ''), # : ''),
$more_links_mark, $more_links_mark,
"\n",
($CHARSET && $HTML_VERSION ge "2.1" ($CHARSET && $HTML_VERSION ge "2.1"
? ('<meta http-equiv="Content-Type" content="text/html; ' ? ('<meta http-equiv="Content-Type" content="text/html; '
. "charset=$CHARSET\">\n") . "charset=$CHARSET\">\n")
...@@ -641,9 +642,10 @@ sub make_head_and_body($$) { ...@@ -641,9 +642,10 @@ sub make_head_and_body($$) {
($AESOP_META_TYPE ($AESOP_META_TYPE
? "<meta name='aesop' content='$AESOP_META_TYPE'>\n" : '')); ? "<meta name='aesop' content='$AESOP_META_TYPE'>\n" : ''));
} }
if (!$charset && $CHARSET) {
if (!$charset && $CHARSET) { $charset = $CHARSET; $charset =~ s/_/\-/go; } $charset = $CHARSET;
$charset =~ s/_/\-/go;
}
join('', join('',
$MY_PARTIAL_HEADER, $MY_PARTIAL_HEADER,
&meta_information($title), &meta_information($title),
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment