diff options
author | Peter Prymmer <PPrymmer@factset.com> | 2002-05-13 13:37:28 -0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-13 23:06:31 +0000 |
commit | 488f41861ce50bf733b1e60ebbef8390e01d3366 (patch) | |
tree | dcd411f3d90aaf7e3fcddf42877b170afc3960ce /vms | |
parent | ccc70a53db4bdfe62527deb9e4c30f19764f9afb (diff) | |
download | perl-488f41861ce50bf733b1e60ebbef8390e01d3366.tar.gz |
Re: unsigned char hashes (Re: perl@16539)
Message-ID: <OFA6169DE6.9ED4C891-ON85256BB8.00767EB7@55.25.11>
p4raw-id: //depot/perl@16585
Diffstat (limited to 'vms')
-rw-r--r-- | vms/vms.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -587,7 +587,7 @@ prime_env_iter(void) Perl_warner(aTHX_ packWARN(WARN_INTERNAL),"Ill-formed message in prime_env_iter: |%s|",buf); continue; } - PERL_HASH(hash,key,keylen); + PERL_HASH(hash,(U8*)key,keylen); sv = newSVpvn(cp2,cp1 - cp2 + 1); SvTAINTED_on(sv); hv_store(envhv,key,keylen,sv,hash); |