fix typo in change#1489 that prevented magic-autovivification
Gurusamy Sarathy [Wed, 29 Jul 1998 18:14:32 +0000 (18:14 +0000)]
p4raw-link: @1489 on //depot/perl: 74e13ce44e4508bd9e7db3e72533836d36277ca3

p4raw-id: //depot/maint-5.005/perl@1673

mg.c

diff --git a/mg.c b/mg.c
index 6068d9b..75c14d0 100644 (file)
--- a/mg.c
+++ b/mg.c
@@ -1398,12 +1398,12 @@ vivify_defelem(SV *sv)
     if (mg->mg_obj) {
        SV *ahv = LvTARG(sv);
        if (SvTYPE(ahv) == SVt_PVHV) {
-           HE *he = hv_fetch_ent((HV*)ahv, mg->mg_obj, FALSE, 0);
+           HE *he = hv_fetch_ent((HV*)ahv, mg->mg_obj, TRUE, 0);
            if (he)
                value = HeVAL(he);
        }
        else {
-           SV **svp = avhv_fetch_ent((AV*)ahv, mg->mg_obj, FALSE, 0);
+           SV **svp = avhv_fetch_ent((AV*)ahv, mg->mg_obj, TRUE, 0);
            if (svp)
                value = *svp;
        }