diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-10-27 09:39:11 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2012-03-22 22:14:24 -0600 |
commit | d6ca7b3de844e6b76d68a8ea0967e932b9d2bb08 (patch) | |
tree | 24f4573379183bccfcfc60f324a2830da88cd722 /t | |
parent | 1118b943c2eac15b58b91de9ffbe015c923e4348 (diff) | |
download | perl-smoke-me/khw-5.14.3.tar.gz |
PATCH: [perl #101970] /[[:lower:]]/i matches upper casesmoke-me/khw-5.14.3
This bug is a regression in 5.14, in which /[[:lower:]]/i and
/[[:upper:]]/i no longer matched the opposite case.
The fix is to have these use a different table under /i matching, that
includes the correct /i code points. These tables were already
available, just unused.
Diffstat (limited to 't')
-rw-r--r-- | t/re/re_tests | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/t/re/re_tests b/t/re/re_tests index ae124522f8..144cf1e8c8 100644 --- a/t/re/re_tests +++ b/t/re/re_tests @@ -1528,4 +1528,8 @@ abc\N{def - c - \\N{NAME} must be resolved by the lexer /fi/i \x{FB01}\x{FB00} y $& \x{FB01} /fi/i \x{FB00}\x{FB01} y $& \x{FB01} +# [perl #101970] +/[[:lower:]]/i \x{100} y $& \x{100} +/[[:upper:]]/i \x{101} y $& \x{101} + # vim: softtabstop=0 noexpandtab |