X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Findirect.git;a=blobdiff_plain;f=indirect.xs;h=dbcaad15c77d6250114a613c3151a3318375d2ba;hp=0bfc3cd83679cabaa0d3390c7fa372090c36331f;hb=1e667868c750e919a338cc4ceba4e9e86bf16c89;hpb=646717579d96585f6b9aa4327769e6f7553265f8 diff --git a/indirect.xs b/indirect.xs index 0bfc3cd..dbcaad1 100644 --- a/indirect.xs +++ b/indirect.xs @@ -405,8 +405,7 @@ STATIC SV *indirect_hint(pTHX) { indirect_hash); #else { - SV **val = hv_fetch(GvHV(PL_hintgv), __PACKAGE__, __PACKAGE_LEN__, - indirect_hash); + SV **val = hv_fetch(GvHV(PL_hintgv), __PACKAGE__, __PACKAGE_LEN__, 0); if (!val) return 0; hint = *val;