X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=Magic.xs;h=f4ec2923552d7a56da825e4232a27fa7ff0b7f46;hb=2b17c3d6ed76489160907e04347b661919f8fe2c;hp=30577d4ccbb32acd9f48fd1322707213dacd0346;hpb=4e5104c1b58e7247db0fed63387b6fb245221a24;p=perl%2Fmodules%2FVariable-Magic.git diff --git a/Magic.xs b/Magic.xs index 30577d4..f4ec292 100644 --- a/Magic.xs +++ b/Magic.xs @@ -852,7 +852,7 @@ CODE: #endif /* VMG_UVAR */ sv = MGWIZ2SV(w); - mg = sv_magicext(sv, NULL, PERL_MAGIC_ext, &vmg_wizard_vtbl, NULL, -1); + mg = sv_magicext(sv, NULL, PERL_MAGIC_ext, &vmg_wizard_vtbl, NULL, 0); mg->mg_private = SIG_WIZ; SvREADONLY_on(sv);