summaryrefslogtreecommitdiff
path: root/pod/pod2man.PL
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-05-14 23:11:05 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-05-14 23:11:05 +0000
commit7b8d334a971230040a212bc5038097b3f600a094 (patch)
treee0fd6231e06e9b8f7e54aae4cec4ead51585219a /pod/pod2man.PL
parent6ee623d521a149edc6574c512fa951a192cd086a (diff)
downloadperl-7b8d334a971230040a212bc5038097b3f600a094.tar.gz
[win32] merge change#897 from maintbranch
p4raw-link: @897 on //depot/maint-5.004/perl: f06f9b6fc5a686f0169ee2a91b32d5e7125a44ae p4raw-id: //depot/win32/perl@974
Diffstat (limited to 'pod/pod2man.PL')
-rw-r--r--pod/pod2man.PL2
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/pod2man.PL b/pod/pod2man.PL
index a91d3e585e..42ad9f917c 100644
--- a/pod/pod2man.PL
+++ b/pod/pod2man.PL
@@ -736,7 +736,7 @@ while (<>) {
# first hide the escapes in case we need to
# intuit something and get it wrong due to fmting
- s/([A-Z]<[^<>]*>)/noremap($1)/ge;
+ 1 while s/([A-Z]<[^<>]*>)/noremap($1)/ge;
# func() is a reference to a perl function
s{