diff options
author | ph10 <ph10@2f5784b3-3f2a-0410-8824-cb99058d5e15> | 2009-10-05 10:59:35 +0000 |
---|---|---|
committer | ph10 <ph10@2f5784b3-3f2a-0410-8824-cb99058d5e15> | 2009-10-05 10:59:35 +0000 |
commit | f66c8de115b662c90e2a0af9a4357f69df2b3106 (patch) | |
tree | fec1a80cdf7c366cb1868339fce075f556c95feb /perltest.pl | |
parent | 7f1b753dfecb0db660812f00e667abaca6252e28 (diff) | |
download | pcre-f66c8de115b662c90e2a0af9a4357f69df2b3106.tar.gz |
Tidy up, remove trailing spaces, etc. for 8.00-RC1.
git-svn-id: svn://vcs.exim.org/pcre/code/trunk@461 2f5784b3-3f2a-0410-8824-cb99058d5e15
Diffstat (limited to 'perltest.pl')
-rwxr-xr-x | perltest.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perltest.pl b/perltest.pl index c4f1c97..a16345d 100755 --- a/perltest.pl +++ b/perltest.pl @@ -90,10 +90,10 @@ for (;;) # Remove /8 from a UTF-8 pattern. $utf8 = $pattern =~ s/8(?=[a-z]*$)//; - + # Remove /J from a pattern with duplicate names. - - $pattern =~ s/J(?=[a-z]*$)//; + + $pattern =~ s/J(?=[a-z]*$)//; # Check that the pattern is valid |