diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-05-29 21:14:51 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-05-29 21:35:58 -0600 |
commit | 67a53d688ca9c89ddf138af0a4561601b3b778a8 (patch) | |
tree | 7f4d4c5e02c93dbb0c932a4ed91faec08b1ff999 | |
parent | 40f11004fb3b5fa1cd207a20090df837d721b736 (diff) | |
download | perl-67a53d688ca9c89ddf138af0a4561601b3b778a8.tar.gz |
mktables: Avoid possible user-defined property
Properties with no elements are defined in terms of the complement
of the property which matches all of Unicode: \p{Any}. But it
currently is defined in terms of IsAny, which is user-overridable;
Just drop the 'Is'
-rw-r--r-- | lib/unicore/mktables | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/unicore/mktables b/lib/unicore/mktables index 25a74ec60a..e93e0a288a 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -4967,7 +4967,7 @@ sub trace { return main::trace(@_); } # utf8.c, which can't really deal with empty tables, but it can # deal with a table that matches nothing, as the inverse of 'Any' # does. - push @OUT, "!utf8::IsAny\n"; + push @OUT, "!utf8::Any\n"; } else { my $range_size_1 = $range_size_1{$addr}; |