projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
[perl #18232] [PATCH] store PL_reg_match_utf8 in reganch
[p5sagit/p5-mst-13.2.git]
/
pp_ctl.c
diff --git
a/pp_ctl.c
b/pp_ctl.c
index
7c0f8ba
..
a08e2b6
100644
(file)
--- a/
pp_ctl.c
+++ b/
pp_ctl.c
@@
-158,7
+158,7
@@
PP(pp_substcont)
register REGEXP *rx = cx->sb_rx;
rxres_restore(&cx->sb_rxres, rx);
- PL_reg_match_utf8 = SvUTF8(cx->sb_targ) ? 1 : 0;
+ RX_MATCH_UTF8_set(rx, SvUTF8(cx->sb_targ));
if (cx->sb_iters++) {
I32 saviters = cx->sb_iters;