testcase for change #27832
authorJan Dubois <jand@activestate.com>
Sun, 16 Apr 2006 00:57:00 +0000 (17:57 -0700)
committerSteve Peters <steve@fisharerojo.org>
Sun, 16 Apr 2006 13:52:47 +0000 (13:52 +0000)
From: "Jan Dubois" <jand@ActiveState.com>
Message-ID: <022a01c6612b$575cb7e0$2217a8c0@candy>

p4raw-id: //depot/perl@27847

lib/Pod/Html.pm
lib/Pod/t/htmllink.pod

index ba54fd5..6a7d9a6 100644 (file)
@@ -1501,6 +1501,7 @@ sub process_text {
     return if $Ignore;
     my( $tref ) = @_;
     my $res = process_text1( 0, $tref );
+    $res =~ s/\s+$//s;
     $$tref = $res;
 }
 
index 2113db7..db2f984 100644 (file)
@@ -92,15 +92,17 @@ This is section three.
 
 =over 4
 
-=item item1
+=item item1 X<item> X<one>
 
 This is item one.
 
 =item item 2
+X<item> X<two>
 
 This is item two.
 
-=item item three
+=item item three X<item>
+X<three>
 
 This is item three.