new test for change #17773

Subject: lib/Pod/t/htmlview.t and lib/Pod/t/htmlview.pod patch (to account for the Pod::Html patch)
Message-ID: <20020826083627.46199.qmail@web40207.mail.yahoo.com>
p4raw-link: @17773 on //depot/perl: 69e2f04480336aed2ad842f2b92ce366bcd2e9e1

p4raw-id: //depot/perl@17782

diff --git a/lib/Pod/t/htmlview.pod b/lib/Pod/t/htmlview.pod
index 62ac71c..3ac3789 100644 (file)
--- a/lib/Pod/t/htmlview.pod
+++ b/lib/Pod/t/htmlview.pod
@@ -135,6 +135,8 @@ This is an href link2: http://example.com/foo/bar.html
 
 This is an email link: mailto:foo@bar.com
 
+    This is a link in a verbatim block <a href="http://perl.org"> Perl </a>
+
 =head1 SEE ALSO
 
 See also L<Test Page 2|htmlescp>, the L<Your::Module> and L<Their::Module>

diff --git a/lib/Pod/t/htmlview.t b/lib/Pod/t/htmlview.t
index a36b58a..689f6d5 100644 (file)
--- a/lib/Pod/t/htmlview.t
+++ b/lib/Pod/t/htmlview.t
@@ -163,6 +163,8 @@ HTML
 <p>This is an href link1: <a href="http://example.com">http://example.com</a></p>
 <p>This is an href link2: <a href="http://example.com/foo/bar.html">http://example.com/foo/bar.html</a></p>
 <p>This is an email link: <a href="mailto:mailto:foo@bar.com">mailto:foo@bar.com</a></p>
+<pre>
+    This is a link in a verbatim block &lt;a href=&quot;<a href="http://perl.org">http://perl.org</a>&quot;&gt; Perl &lt;/a&gt;</pre>
 <p>
 </p>
 <hr />