summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2005-05-21 04:06:40 -0500
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-05-24 12:33:01 +0000
commit504618e92cbf415cc727244b0e64aab9ddfb1c10 (patch)
tree013cc7cb013c430f1c256b1dd1109b8b82da0241 /utf8.c
parent3480a8d2d46562b783befbcecf951d5a2b4067d7 (diff)
downloadperl-504618e92cbf415cc727244b0e64aab9ddfb1c10.tar.gz
embed.fnc cleanup + SvPVX_const usage
Message-ID: <20050521140640.GB875@petdance.com> p4raw-id: //depot/perl@24561
Diffstat (limited to 'utf8.c')
-rw-r--r--utf8.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/utf8.c b/utf8.c
index 35fbe3867d..02e202dabb 100644
--- a/utf8.c
+++ b/utf8.c
@@ -521,7 +521,7 @@ malformed:
}
if (warning) {
- char *s = SvPVX(sv);
+ const char *s = SvPVX_const(sv);
if (PL_op)
Perl_warner(aTHX_ packWARN(WARN_UTF8),