From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Fri, 28 Apr 2006 07:58:16 +0000 (+0000)
Subject: Fix typo in function call
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ba1fe781b25ca91156a66df5a1cba2c16580a339;p=p5sagit%2Fp5-mst-13.2.git

Fix typo in function call

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

diff --git a/perlio.c b/perlio.c
index cc82ffd..1921d0a 100644
--- a/perlio.c
+++ b/perlio.c
@@ -476,7 +476,7 @@ PerlIO_debug(const char *fmt, ...)
 	char buffer[1024];
 	const STRLEN len = my_sprintf(buffer, "%.40s:%" IVdf " ", s ? s : "(none)", (IV) CopLINE(PL_curcop));
 # ifdef USE_VSNPRINTF
-	const STRLEN len2 = vnsprintf(buffer+len, sizeof(buffer) - len, fmt, ap);
+	const STRLEN len2 = vsnprintf(buffer+len, sizeof(buffer) - len, fmt, ap);
 # else
 	const STRLEN len2 = vsprintf(buffer+len, fmt, ap);
 # endif /* USE_VSNPRINTF */