It appears that the S<> bug in Pod::Simple hasn't been fixed yet.

[p5sagit/p5-mst-13.2.git] / lib / Pod / t / basic.man

diff --git a/lib/Pod/t/basic.man b/lib/Pod/t/basic.man
index 499e06f..9c2248e 100644 (file)
--- a/lib/Pod/t/basic.man
+++ b/lib/Pod/t/basic.man
@@ -177,7 +177,7 @@ This paragraph should be doubly indented.
 .Sp
 This paragraph should only be singly indented.
 .IP "\(bu" 4
-This is an item in the middle of a block\-quote, which should be allowed.
+This is an item in the middle of a block-quote, which should be allowed.
 .IP "\(bu" 4
 We're also testing tagless item commands.
 .RE
@@ -230,7 +230,7 @@ the first < seen.
 Lets make sure these work for empty ones too, like \f(CW\*(C`\*(C'\fR and \f(CW\*(C`>>\*(C'\fR
 (just to be obnoxious)
 .PP
-The statement: \f(CW\*(C`This is dog kind's \f(CIfinest\f(CW hour!\*(C'\fR is a parody of a
+The statement: \f(CW\*(C`This is dog kind\*(Aqs \f(CIfinest\f(CW hour!\*(C'\fR is a parody of a
 quotation from Winston Churchill.
 .PP
 The following tests are added to those:
@@ -254,7 +254,7 @@ A forward slash.
 Try to get this bit of text over towards the edge so |that\ all\ of\ this\ text\ inside\ S<>\ won't| be wrapped.  Also test the
 |same\ thing\ with\ non-breaking\ spaces.|
 .PP
-There is a soft hy\%phen in hyphen at hy\-phen.
+There is a soft hy\%phen in hyphen at hy-phen.
 .PP
 This is a test of an index entry.
 .IX Xref "index entry"
@@ -264,16 +264,16 @@ Throw in a few verbatim paragraphs.
 .PP
 .Vb 8
 \&    use Term::ANSIColor;
-\&    print color 'bold blue';
+\&    print color \*(Aqbold blue\*(Aq;
 \&    print "This text is bold blue.\en";
-\&    print color 'reset';
+\&    print color \*(Aqreset\*(Aq;
 \&    print "This text is normal.\en";
-\&    print colored ("Yellow on magenta.\en", 'yellow on_magenta');
+\&    print colored ("Yellow on magenta.\en", \*(Aqyellow on_magenta\*(Aq);
 \&    print "This text is normal.\en";
-\&    print colored ['yellow on_magenta'], "Yellow on magenta.\en";
+\&    print colored [\*(Aqyellow on_magenta\*(Aq], "Yellow on magenta.\en";
 \&
 \&    use Term::ANSIColor qw(uncolor);
-\&    print uncolor '01;31', "\en";
+\&    print uncolor \*(Aq01;31\*(Aq, "\en";
 .Ve
 .PP
 But this isn't verbatim (make sure it wraps properly), and the next