Changeset 68f358cfe28c85474e90e129c5e96645d5b86963

Show
Ignore:
Timestamp:
10/19/09 23:05:08 (5 weeks ago)
Author:
Anders Kaseorg <andersk@mit.edu>
Parents:
ba88ae7cb3b174b108b29aeb3ff5602b8bfd2871
Children:
6337cb5742f397a3db9201557de56be05c9394a1
git-committer:
Anders Kaseorg <andersk@mit.edu> / 2009-10-19T23:05:08Z-0400
Message:
owl_new_sv: Small const fix.

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

Legend:

Unmodified
Added
Removed
  • perlconfig.c

    r1373d35 r68f358c  
    2626{ 
    2727  SV *ret = newSVpv(str, 0); 
    28   if(is_utf8_string((U8*)str, strlen(str))) { 
     28  if (is_utf8_string((const U8 *)str, strlen(str))) { 
    2929    SvUTF8_on(ret); 
    3030  } else {