summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-11-10 15:05:56 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-11-10 15:05:56 +0000
commit3e16932524becaa89351f54bcab041596f67d434 (patch)
tree9f9d38c74d97f4b1fc8a2a51087235d58b0b65d4 /sv.c
parentf0c07f2e993fec333a0163b30f3eb0d3dd15b18e (diff)
downloadperl-3e16932524becaa89351f54bcab041596f67d434.tar.gz
A potential recursion breaker.
p4raw-id: //depot/perl@12931
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/sv.c b/sv.c
index 19ce50ab07..4045928831 100644
--- a/sv.c
+++ b/sv.c
@@ -10407,7 +10407,7 @@ Perl_sv_recode_to_utf8(pTHX_ SV *sv, SV *encoding)
SPAGAIN;
uni = POPs;
PUTBACK;
- s = SvPVutf8(uni, len);
+ s = SvPV(uni, len);
if (s != SvPVX(sv)) {
SvGROW(sv, len);
Move(s, SvPVX(sv), len, char);