From: David Mitchell <davem@iabyn.com>
Date: Sat, 26 Mar 2011 17:46:37 +0000 (+0000)
Subject: utf8.c: silence compiler warnings
X-Git-Tag: accepted/trunk/20130322.191538~4582
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=61a12c31224e292d9731fb0ed802186aaecbd06f;p=platform%2Fupstream%2Fperl.git

utf8.c: silence compiler warnings

prefer foo("%s", fixedstr) over foo(fixedstr).
One day someone might change fixedstr to include '%' characters.
---

diff --git a/utf8.c b/utf8.c
index 9d3770d..9c2061d 100644
--- a/utf8.c
+++ b/utf8.c
@@ -841,7 +841,7 @@ Perl_utf8_length(pTHX_ const U8 *s, const U8 *e)
 	    Perl_ck_warner_d(aTHX_ packWARN(WARN_UTF8),
 			     "%s in %s", unees, OP_DESC(PL_op));
 	else
-	    Perl_ck_warner_d(aTHX_ packWARN(WARN_UTF8), unees);
+	    Perl_ck_warner_d(aTHX_ packWARN(WARN_UTF8), "%s", unees);
     }
 
     return len;
@@ -953,7 +953,7 @@ Perl_bytes_cmp_utf8(pTHX_ const U8 *b, STRLEN blen, const U8 *u, STRLEN ulen)
 			Perl_ck_warner_d(aTHX_ packWARN(WARN_UTF8),
 					 "%s in %s", unees, OP_DESC(PL_op));
 		    else
-			Perl_ck_warner_d(aTHX_ packWARN(WARN_UTF8), unees);
+			Perl_ck_warner_d(aTHX_ packWARN(WARN_UTF8), "%s", unees);
 		    return -2; /* Really want to return undef :-)  */
 		}
 	    } else {