From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 10 Nov 2001 15:05:56 +0000 (+0000)
Subject: A potential recursion breaker.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3e16932524becaa89351f54bcab041596f67d434;p=p5sagit%2Fp5-mst-13.2.git

A potential recursion breaker.

p4raw-id: //depot/perl@12931
---

diff --git a/sv.c b/sv.c
index 19ce50a..4045928 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);