X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fre-engine-Hooks.git;a=blobdiff_plain;f=src%2F5011000%2Fregexec.c;h=0fc5374c2df4cf4c47f07f8ad1dd969294715579;hp=a7e62d607a8a9256be47b12d9e09a0f5a8c303ad;hb=3873fbc39d250734131e096da47add0cf601d194;hpb=d2b7e04fb8d40639a353ea53a1957b9872373c8b

diff --git a/src/5011000/regexec.c b/src/5011000/regexec.c
index a7e62d6..0fc5374 100644
--- a/src/5011000/regexec.c
+++ b/src/5011000/regexec.c
@@ -2844,7 +2844,7 @@ S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog)
 	    next = NULL;
 	state_num = OP(scan);
 
-	REH_CALL_REGEXEC_HOOK(rex, scan, reginfo, st);
+	REH_CALL_EXEC_NODE_HOOK(rex, scan, reginfo, st);
       reenter_switch:
 
 	assert(PL_reglastparen == &rex->lastparen);