From 47aca9b87dccacc92554e8ed1105191dcd583999 Mon Sep 17 00:00:00 2001 From: "Todd C. Miller" Date: Sat, 25 Sep 2010 15:12:02 +0000 Subject: Use snprintf() not sprintf() --- gnu/usr.bin/perl/x2p/str.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gnu/usr.bin/perl/x2p/str.c b/gnu/usr.bin/perl/x2p/str.c index 58798c011fc..48e417eee34 100644 --- a/gnu/usr.bin/perl/x2p/str.c +++ b/gnu/usr.bin/perl/x2p/str.c @@ -29,7 +29,7 @@ str_2ptr(register STR *str) GROWSTR(&(str->str_ptr), &(str->str_len), 24); s = str->str_ptr; if (str->str_nok) { - sprintf(s,"%.20g",str->str_nval); + snprintf(s,str->str_len,"%.20g",str->str_nval); while (*s) s++; } *s = '\0'; -- cgit v1.2.3