diff options
author | Nicholas Clark <nick@ccl4.org> | 2006-02-02 00:36:38 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2006-02-02 00:36:38 +0000 |
commit | 71315bf2ed5c47e3f417cdce95f41fe9b0da6b1f (patch) | |
tree | 1779355572700dff2c66703cc911987108bd1d45 /util.c | |
parent | b208e10c815b328b5c2ddc25197ff4990f6302e0 (diff) | |
download | perl-71315bf2ed5c47e3f417cdce95f41fe9b0da6b1f.tar.gz |
Yet more instances of gv_fetchpv... that should be GV_ADD rather than
TRUE.
Convert two gv_fetchpvn_flags to gv_fetchpvs.
p4raw-id: //depot/perl@27050
Diffstat (limited to 'util.c')
-rw-r--r-- | util.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2273,7 +2273,7 @@ Perl_my_popen(pTHX_ const char *cmd, const char *mode) PerlProc__exit(1); } #endif /* defined OS2 */ - if ((tmpgv = gv_fetchpvs("$",TRUE, SVt_PV))) { + if ((tmpgv = gv_fetchpvs("$", GV_ADD, SVt_PV))) { SvREADONLY_off(GvSV(tmpgv)); sv_setiv(GvSV(tmpgv), PerlProc_getpid()); SvREADONLY_on(GvSV(tmpgv)); |