diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-02-02 14:12:29 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-02-04 15:14:57 -0700 |
| commit | 7620cb1076a0ca7cf9c77b73d4e7c6ff861d3a91 (patch) | |
| tree | 2e061ab40e6bde92ebf4663a8ca0a2dcf4a818c1 /t | |
| parent | 1f3b48882b3173e918e15fa542773c54410f6684 (diff) | |
| download | perl-7620cb1076a0ca7cf9c77b73d4e7c6ff861d3a91.tar.gz | |
Unicode 6.1
This commit delivers the official Unicode character database files for
release 6.1, plus the final bits needed to cope with the changes in them
from release 6.0, including documentation.
Diffstat (limited to 't')
| -rw-r--r-- | t/re/pat_advanced.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/re/pat_advanced.t b/t/re/pat_advanced.t index 4d88190a5e..43db3d4334 100644 --- a/t/re/pat_advanced.t +++ b/t/re/pat_advanced.t @@ -1743,7 +1743,7 @@ EOP my @isPunct = grep {/[[:punct:]]/ != /\p{IsPunct}/} map {chr} 0x80 .. 0xff; - is(join ('', @isPunct), "\xa1\xab\xb7\xbb\xbf", # ¡ « · » ¿ + is(join ('', @isPunct), "\xa1\xa7\xab\xb6\xb7\xbb\xbf", # ¡ « · » ¿ 'IsPunct disagrees with [:punct:] outside ASCII'); my @isPunctLatin1 = eval q { |