Changeset 68f358c

Timestamp:

Oct 19, 2009, 11:05:08 PM (15 years ago)

Author:

Anders Kaseorg <andersk@mit.edu>

Branches:

master, release-1.10, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

6337cb5

Parents:

ba88ae7

Message:

owl_new_sv: Small const fix.

Signed-off-by: Anders Kaseorg <andersk@mit.edu>

File:

• perlconfig.c (modified) (1 diff)

perlconfig.c

@@ -26 +26 @@
 {
   SV *ret = newSVpv(str, 0);
-  if(is_utf8_string((U8*)str, strlen(str))) {
+  if (is_utf8_string((const U8 *)str, strlen(str))) {
     SvUTF8_on(ret);
   } else {