From: Vincent Pit <vince@profvince.com>
Date: Mon, 18 Jul 2011 09:40:23 +0000 (+0200)
Subject: The last argument to hv_fetch is the lvalue flag, not the hash
X-Git-Tag: v0.10~6
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=e6ec2044aaf55c4ae83d62c38ed2f67d5f7749c8;p=perl%2Fmodules%2Fautovivification.git

The last argument to hv_fetch is the lvalue flag, not the hash

This could have caused entry vivifications in %^H on 5.8.
---

diff --git a/autovivification.xs b/autovivification.xs
index fb6015b..a45cda3 100644
--- a/autovivification.xs
+++ b/autovivification.xs
@@ -320,7 +320,7 @@ STATIC UV a_hint(pTHX) {
                                        0,
                                        a_hash);
 #else
- SV **val = hv_fetch(GvHV(PL_hintgv), __PACKAGE__, __PACKAGE_LEN__, a_hash);
+ SV **val = hv_fetch(GvHV(PL_hintgv), __PACKAGE__, __PACKAGE_LEN__, 0);
  if (!val)
   return 0;
  hint = *val;