Bring Pod::Simple up to 3.09 as on CPAN.
[p5sagit/p5-mst-13.2.git] / cpan / Pod-Simple / t / html01.t
index 2c0b04e..18e84a8 100644 (file)
@@ -9,7 +9,7 @@ BEGIN {
 
 use strict;
 use Test;
-BEGIN { plan tests => 8 };
+BEGIN { plan tests => 9 };
 
 #use Pod::Simple::Debug (10);
 
@@ -71,6 +71,25 @@ ok(x(
   "heading building"
 );
 
+print x("=over 4\n\n=item one\n\n=item two\n\nHello\n\n=back\n");
+ok(
+    x("=over 4\n\n=item one\n\n=item two\n\nHello\n\n=back\n"),
+    q{
+<dl>
+<dt><a name="one"
+>one</a></dt>
+
+<dd>
+<dt><a name="two"
+>two</a></dt>
+
+<dd>
+<p>Hello</p>
+</dd>
+</dl>
+}
+);
+
 
 print "# And one for the road...\n";
 ok 1;