From: Nicholas Clark <nick@ccl4.org>
Date: Sat, 6 Oct 2007 14:56:18 +0000 (+0000)
Subject: Fix typo in change 32043 - s/sv_catpvf/sv_catpvs/
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=49de0815fabe2891621aa5754fc49ec77651298a;p=p5sagit%2Fp5-mst-13.2.git

Fix typo in change 32043 - s/sv_catpvf/sv_catpvs/

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

diff --git a/dump.c b/dump.c
index 1ad3e77..d4fe8b5 100644
--- a/dump.c
+++ b/dump.c
@@ -2243,7 +2243,7 @@ Perl_sv_catxmlpvn(pTHX_ SV *dsv, const char *pv, STRLEN len, int utf8)
 	    sv_catpvs(dsv, "&amp;");
 	    break;
 	case '"':
-	    sv_catpvf(dsv, "&#34;");
+	    sv_catpvs(dsv, "&#34;");
 	    break;
 	default:
 	    if (c < 0xD800) {