"make regen" required. Steven Schubiger diff -ru perl-current/embed.fnc perl-hack/embed.fnc --- perl-current/embed.fnc 2008-01-29 11:56:58.000000000 +0100 +++ perl-hack/embed.fnc 2008-01-29 13:38:09.000000000 +0100 @@ -921,7 +921,7 @@ Ap |SV* |swash_init |NN const char* pkg|NN const char* name|NN SV* listsv|I32 minbits|I32 none Ap |UV |swash_fetch |NN SV *swash|NN const U8 *ptr|bool do_utf8 Ap |void |taint_env -Ap |void |taint_proper |NULLOK const char* f|NN const char* s +Ap |void |taint_proper |NULLOK const char* f|NN const char *const s Apd |UV |to_utf8_case |NN const U8 *p|NN U8* ustrp|NULLOK STRLEN *lenp \ |NN SV **swashp|NN const char *normal|NN const char *special Apd |UV |to_utf8_lower |NN const U8 *p|NN U8* ustrp|NULLOK STRLEN *lenp diff -ru perl-current/taint.c perl-hack/taint.c --- perl-current/taint.c 2007-11-08 00:25:19.000000000 +0100 +++ perl-hack/taint.c 2008-01-29 13:40:42.000000000 +0100 @@ -22,7 +22,7 @@ #include "perl.h" void -Perl_taint_proper(pTHX_ const char *f, const char *s) +Perl_taint_proper(pTHX_ const char *f, const char *const s) { #if defined(HAS_SETEUID) && defined(DEBUGGING) dVAR;Thread Next