diff options
author | Steve Peters <steve@fisharerojo.org> | 2005-10-02 02:24:12 +0000 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2005-10-02 02:24:12 +0000 |
commit | ae021980da32a6a5f8724b77b145b41e613d3686 (patch) | |
tree | 6cdb6104272f3001522280ad9aa1948120ce63d1 /lib | |
parent | b6007c36c30a8a1e5cbbe94d9df74e4b4d961176 (diff) | |
download | perl-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.pm | 3 |
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; |