diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/charnames.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/charnames.pm b/lib/charnames.pm index 95bbc73077..5cda64cc51 100644 --- a/lib/charnames.pm +++ b/lib/charnames.pm @@ -468,7 +468,7 @@ sub alias (@) # Set up a single alias $value = CORE::hex $1; } if ($value =~ $decimal_qr) { - no warnings 'utf8'; # Allow even illegal characters + no warnings qw(non_unicode surrogate nonchar); # Allow any non-malformed $^H{charnames_ord_aliases}{$name} = pack("U", $value); # Use a canonical form. |