diff options
Diffstat (limited to 't/charset_tools.pl')
| -rw-r--r-- | t/charset_tools.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/charset_tools.pl b/t/charset_tools.pl index 6d70a37cab..0621a7ae96 100644 --- a/t/charset_tools.pl +++ b/t/charset_tools.pl @@ -8,7 +8,7 @@ $::IS_EBCDIC = ord 'A' == 193; # the set of 256 characters which is usually called Latin1. However, they # will work properly with any character input, not just Latin1. -sub native_to_latin1($) { +sub native_to_uni($) { my $string = shift; return $string if $::IS_ASCII; @@ -23,7 +23,7 @@ sub native_to_latin1($) { return $output; } -sub latin1_to_native($) { +sub uni_to_native($) { my $string = shift; return $string if $::IS_ASCII; |