This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
48fe68f
)
re/re_tests: Correct Todo test
author
Karl Williamson
<public@khwilliamson.com>
Mon, 6 Aug 2012 22:42:27 +0000
(16:42 -0600)
committer
Karl Williamson
<public@khwilliamson.com>
Sun, 12 Aug 2012 01:32:30 +0000
(19:32 -0600)
This test was not doing what it purported to test. It should show that
a /[s\xDF]/i would not match 'ss', because the 's' is seen in the class,
and not the \xDF (which matches 'ss' under /i) in the appropriate
strings
t/re/re_tests
patch
|
blob
|
blame
|
history
diff --git
a/t/re/re_tests
b/t/re/re_tests
index
3fdaf80
..
e8bd714
100644
(file)
--- a/
t/re/re_tests
+++ b/
t/re/re_tests
@@
-1543,7
+1543,7
@@
a\97 a97 y $& a97
/^\p{L}/ \x{3400} y $& \x{3400}
# RT #89774
-/[s\xDF]
/ui \xDFs ybT $& \xDFs
+/[s\xDF]
a/ui ssa ybT $& ssa
# RT #99928
/^\R\x0A$/ \x0D\x0A n - -