diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-03-19 08:58:08 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-03-19 08:58:08 +0000 |
| commit | ac0e6a2fd2970df72270aecb94d407fe170b43a7 (patch) | |
| tree | d8b04099761e9ec4c10f6d39c5d2435b45f3bf50 /gv.c | |
| parent | b01e650a9b9106d610923bb01ce97b6e191ca8ed (diff) | |
| download | perl-ac0e6a2fd2970df72270aecb94d407fe170b43a7.tar.gz | |
Upgrade to version.pm 0.71, by John Peacock
p4raw-id: //depot/perl@30629
Diffstat (limited to 'gv.c')
| -rw-r--r-- | gv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1287,7 +1287,7 @@ Perl_gv_fetchpvn_flags(pTHX_ const char *nambeg, STRLEN full_len, I32 flags, { SV * const sv = GvSVn(gv); if (!sv_derived_from(PL_patchlevel, "version")) - upg_version(PL_patchlevel); + upg_version(PL_patchlevel, TRUE); GvSV(gv) = vnumify(PL_patchlevel); SvREADONLY_on(GvSV(gv)); SvREFCNT_dec(sv); |