summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2005-10-02 02:24:12 +0000
committerSteve Peters <steve@fisharerojo.org>2005-10-02 02:24:12 +0000
commitae021980da32a6a5f8724b77b145b41e613d3686 (patch)
tree6cdb6104272f3001522280ad9aa1948120ce63d1 /lib
parentb6007c36c30a8a1e5cbbe94d9df74e4b4d961176 (diff)
downloadperl-ae021980da32a6a5f8724b77b145b41e613d3686.tar.gz
Fix some of the XHTML issues in Pod::Html. The call for some time
with a debugger to figure out what is going on. p4raw-id: //depot/perl@25675
Diffstat (limited to 'lib')
-rw-r--r--lib/Pod/Html.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/Pod/Html.pm b/lib/Pod/Html.pm
index 3e58162b00..339ecd9733 100644
--- a/lib/Pod/Html.pm
+++ b/lib/Pod/Html.pm
@@ -462,10 +462,12 @@ sub pod2html {
END_OF_BLOCK
print HTML <<END_OF_HEAD;
+<?xml version="1.0" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>$Title</title>$csslink
+<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<link rev="made" href="mailto:$Config{perladmin}" />
</head>
@@ -1182,6 +1184,7 @@ sub process_item {
emit_item_tag( $otext, $text, 1 );
}
$need_dd = 1;
+ print HTML "</dd>";
}
print HTML "\n";
return $need_dd;