From 1946a0741a168241d8fbd229705465c825727649 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Thu, 30 Jun 2005 17:37:56 +0000
Subject: Use sv_setpvn where we know the length.

p4raw-id: //depot/perl@25030
---
 universal.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'universal.c')

diff --git a/universal.c b/universal.c
index ad80a21bee..507ab14e3e 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 ) {
-- 
cgit v1.2.1