Change 14795 by ams@lustre on 2002/02/20 17:08:38

           Subject: Re: Re-posts of some unresolved bleadperl bugreports
           From: Hugo van der Sanden <[EMAIL PROTECTED]>
           Date: Wed, 20 Feb 2002 18:06:59 +0000
           Message-Id: <[EMAIL PROTECTED]>

Affected files ...

.... //depot/perl/pp_ctl.c#306 edit

Differences ...

==== //depot/perl/pp_ctl.c#306 (text) ====
Index: perl/pp_ctl.c
--- perl/pp_ctl.c.~1~   Wed Feb 20 10:15:05 2002
+++ perl/pp_ctl.c       Wed Feb 20 10:15:05 2002
@@ -158,6 +158,7 @@
     register REGEXP *rx = cx->sb_rx;
 
     rxres_restore(&cx->sb_rxres, rx);
+    PL_reg_match_utf8 = SvUTF8(cx->sb_targ) ? 1 : 0;
 
     if (cx->sb_iters++) {
        I32 saviters = cx->sb_iters;
End of Patch.

Reply via email to