diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-06-29 19:25:24 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-06-29 19:25:24 +0000 |
commit | e203899dcaadab28f2ff9e515fbc895686054f71 (patch) | |
tree | 22948c5798417be634b104f753423112d77fb415 /doio.c | |
parent | c69033f2a629160559f680da8e4e5a7e3c4c3a0c (diff) | |
download | perl-e203899dcaadab28f2ff9e515fbc895686054f71.tar.gz |
Fixes to -DPERL_DONT_CREATE_GVSV to make more tests pass
p4raw-id: //depot/perl@25010
Diffstat (limited to 'doio.c')
-rw-r--r-- | doio.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -773,7 +773,7 @@ Perl_nextargv(pTHX_ register GV *gv) STRLEN oldlen; sv = av_shift(GvAV(gv)); SAVEFREESV(sv); - sv_setsv(GvSV(gv),sv); + sv_setsv(GvSVn(gv),sv); SvSETMAGIC(GvSV(gv)); PL_oldname = SvPVx(GvSV(gv), oldlen); if (do_open(gv,PL_oldname,oldlen,PL_inplace!=0,O_RDONLY,0,Nullfp)) { |