summaryrefslogtreecommitdiff
path: root/perlio.c
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2005-05-20 16:42:10 -0500
committerAbhijit Menon-Sen <ams@wiw.org>2005-05-21 02:58:49 +0000
commitb15aece354b2aec9d338e59acb2abc2deeebc3c0 (patch)
treecd9381dd13364c19fdc12c6a4d15a29d82e5314e /perlio.c
parent8d2f45362e368d7dd455b476c924dcbcc02d845b (diff)
downloadperl-b15aece354b2aec9d338e59acb2abc2deeebc3c0.tar.gz
SvPVX_const - patch #2
Message-Id: <20050521024210.GA29036@mccoy.peters.homeunix.org> p4raw-id: //depot/perl@24523
Diffstat (limited to 'perlio.c')
-rw-r--r--perlio.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/perlio.c b/perlio.c
index 69186cee04..b4ebc7bab7 100644
--- a/perlio.c
+++ b/perlio.c
@@ -4892,7 +4892,7 @@ PerlIO_tmpfile(void)
f = PerlIO_fdopen(fd, "w+");
if (f)
PerlIOBase(f)->flags |= PERLIO_F_TEMP;
- PerlLIO_unlink(SvPVX(sv));
+ PerlLIO_unlink(SvPVX_const(sv));
SvREFCNT_dec(sv);
}
# else /* !HAS_MKSTEMP, fallback to stdio tmpfile(). */