From: Steve Peters <steve@fisharerojo.org>
Date: Sun, 2 Oct 2005 03:30:55 +0000 (+0000)
Subject: Missed test changes and a bit of debugging code that should
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a19d7498e238ac7c03cb96036dee4a734a2a0356;p=p5sagit%2Fp5-mst-13.2.git

Missed test changes and a bit of debugging code that should
have been removed.

p4raw-id: //depot/perl@25676
---

diff --git a/lib/Pod/Html.pm b/lib/Pod/Html.pm
index 339ecd9..4031f7a 100644
--- a/lib/Pod/Html.pm
+++ b/lib/Pod/Html.pm
@@ -1184,7 +1184,6 @@ sub process_item {
             emit_item_tag( $otext, $text, 1 );
         }
         $need_dd = 1;
-        print HTML "</dd>";
     }
     print HTML "\n";
     return $need_dd;
diff --git a/lib/Pod/t/htmlescp.t b/lib/Pod/t/htmlescp.t
index b7913c5..a17a549 100644
--- a/lib/Pod/t/htmlescp.t
+++ b/lib/Pod/t/htmlescp.t
@@ -13,10 +13,12 @@ use Test::More tests => 1;
 convert_n_test("htmlescp", "html escape");
 
 __DATA__
+<?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>NAME</title>
+<meta http-equiv="content-type" content="text/html; charset=utf-8" />
 <link rev="made" href="mailto:[PERLADMIN]" />
 </head>
 
diff --git a/lib/Pod/t/htmlview.t b/lib/Pod/t/htmlview.t
index ea642ee..50cbc2a 100644
--- a/lib/Pod/t/htmlview.t
+++ b/lib/Pod/t/htmlview.t
@@ -13,10 +13,12 @@ use Test::More tests => 1;
 convert_n_test("htmlview", "html rendering");
 
 __DATA__
+<?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>NAME</title>
+<meta http-equiv="content-type" content="text/html; charset=utf-8" />
 <link rev="made" href="mailto:[PERLADMIN]" />
 </head>