Change 27456 by [EMAIL PROTECTED] on 2006/03/09 23:23:19
Correct another gv_fetchpv() - it takes a bitmask of flags, not simply
TRUE/FALSE.
Affected files ...
... //depot/perl/gv.c#311 edit
Differences ...
==== //depot/perl/gv.c#311 (text) ====
Index: perl/gv.c
--- perl/gv.c#310~27382~ 2006-03-05 11:07:12.000000000 -0800
+++ perl/gv.c 2006-03-09 15:23:19.000000000 -0800
@@ -1347,7 +1347,7 @@
{
dVAR;
return gv_fetchpv(Perl_form(aTHX_ "%s::_GEN_%ld", pack, (long)PL_gensym++),
- TRUE, SVt_PVGV);
+ GV_ADD, SVt_PVGV);
}
/* hopefully this is only called on local symbol table entries */
End of Patch.
