diff options
| author | Ton Hospel <perl5-porters@ton.iguana.be> | 2005-03-06 18:29:38 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-03-08 17:53:50 +0000 |
| commit | f337b084e4f053c4222a0b9a773a9e12c0232e6d (patch) | |
| tree | 1292203ca74046d2df21ce05bb8f8289ea14bc8d /lib/charnames.t | |
| parent | c478aefb95db58c5f937ab7c70bba552d23df9b2 (diff) | |
| download | perl-f337b084e4f053c4222a0b9a773a9e12c0232e6d.tar.gz | |
Encoding neutral unpack
Message-Id: <d0fi6i$k06$1@post.home.lunix>
p4raw-id: //depot/perl@24010
Diffstat (limited to 'lib/charnames.t')
| -rw-r--r-- | lib/charnames.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/charnames.t b/lib/charnames.t index 49917c5ad6..c53f54a067 100644 --- a/lib/charnames.t +++ b/lib/charnames.t @@ -61,7 +61,7 @@ else { # EBCDIC where UTF-EBCDIC may be used (this may be 1047 specific since } sub to_bytes { - pack"a*", shift; + unpack"U0a*", shift; } { |