X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Findirect.git;a=blobdiff_plain;f=indirect.xs;h=dbcaad15c77d6250114a613c3151a3318375d2ba;hp=0bfc3cd83679cabaa0d3390c7fa372090c36331f;hb=85db13117ff9f1611f5f0364093799351673840f;hpb=31786d861edccae57968f02e1872df9775ced1d4 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;