From: Nicholas Clark <nick@ccl4.org>
Date: Thu, 30 Jun 2005 17:37:56 +0000 (+0000)
Subject: Use sv_setpvn where we know the length.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1946a0741a168241d8fbd229705465c825727649;p=p5sagit%2Fp5-mst-13.2.git

Use sv_setpvn where we know the length.

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

diff --git a/universal.c b/universal.c
index ad80a21..507ab14 100644
--- a/universal.c
+++ b/universal.c
@@ -418,7 +418,7 @@ XS(XS_version_new)
 	    else {
 		/* create empty object */
 		vs = sv_newmortal();
-		sv_setpv(vs,"");
+		sv_setpvn(vs,"",0);
 	    }
 	}
 	else if ( items == 3 ) {