diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-05-28 21:15:58 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-05-28 21:15:58 +0000 |
commit | 413e5597fa15080977e13a1ad58f104914a75a31 (patch) | |
tree | 560049a5aae9c71ac16db7ccef78b1aba30bdded /lib/ExtUtils | |
parent | f39d0b86ee5f9f99b2300012ab6be91fafbb04e4 (diff) | |
download | perl-413e5597fa15080977e13a1ad58f104914a75a31.tar.gz |
small bug in change#6144; remove random \xA0 character that snuck
in via change#6145
p4raw-link: @6145 on //depot/perl: e03d20b37534005291cfa8844300128459541e0e
p4raw-link: @6144 on //depot/perl: 0eb0485562acdea1555bc121d0e989d63a918d26
p4raw-id: //depot/perl@6155
Diffstat (limited to 'lib/ExtUtils')
-rwxr-xr-x | lib/ExtUtils/xsubpp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ExtUtils/xsubpp b/lib/ExtUtils/xsubpp index 30b264c0a6..eb085f542f 100755 --- a/lib/ExtUtils/xsubpp +++ b/lib/ExtUtils/xsubpp @@ -894,7 +894,7 @@ sub fetch_para { for(;;) { # Skip embedded PODs - while ($lastline =~ /^=/) { + while ($lastline =~ /^=/) { while ($lastline = <$FH>) { last if ($lastline =~ /^=cut\s*$/); } |