diff options
| author | Yves Orton <demerphq@gmail.com> | 2007-03-20 02:40:34 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-03-20 09:01:05 +0000 |
| commit | 02daf0ab3f11bf85e3739683ba94241d1c4cf8b2 (patch) | |
| tree | cb6815c0462ba728608ac715097e05c9ebf36e64 /regexec.c | |
| parent | b5dffda6f343ffd74e5c9a395a43ef0450d6727b (diff) | |
| download | perl-02daf0ab3f11bf85e3739683ba94241d1c4cf8b2.tar.gz | |
feel the the baà (encoding problems in the regex engine)
Message-ID: <9b18b3110703191740m6bf21942p6521f3016ed8092f@mail.gmail.com>
p4raw-id: //depot/perl@30647
Diffstat (limited to 'regexec.c')
| -rw-r--r-- | regexec.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1997,7 +1997,7 @@ Perl_regexec_flags(pTHX_ register regexp *prog, char *stringarg, register char * SV * const prop = sv_newmortal(); regprop(prog, prop, c); { - RE_PV_QUOTED_DECL(quoted,UTF,PERL_DEBUG_PAD_ZERO(1), + RE_PV_QUOTED_DECL(quoted,do_utf8,PERL_DEBUG_PAD_ZERO(1), s,strend-s,60); PerlIO_printf(Perl_debug_log, "Matching stclass %.*s against %s (%d chars)\n", |