From: Gurusamy Sarathy <gsar@cpan.org>
Date: Thu, 19 Feb 1998 19:40:27 +0000 (+0000)
Subject: [win32] Fix C<0> problem in Pod::Html
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ec978fad5d816cace522ccc8e785c55223dec621;p=p5sagit%2Fp5-mst-13.2.git

[win32] Fix C<0> problem in Pod::Html

p4raw-id: //depot/win32/perl@534
---

diff --git a/lib/Pod/Html.pm b/lib/Pod/Html.pm
index d03c1b6..eb08e0a 100644
--- a/lib/Pod/Html.pm
+++ b/lib/Pod/Html.pm
@@ -1116,7 +1116,7 @@ sub process_text {
 	# parse through the string, stopping each time we find a
 	# pod-escape.  once the string has been throughly processed
 	# we can output it.
-	while ($rest) {
+	while (length $rest) {
 	    # check to see if there are any possible pod directives in
 	    # the remaining part of the text.
 	    if ($rest =~ m/[BCEIFLSZ]</) {