From f702bf4a18c28d214aa0d9f3699ad336576ea7b2 Mon Sep 17 00:00:00 2001 From: Hugo van der Sanden Date: Tue, 25 Feb 2003 14:07:59 +0000 Subject: [PATCH] More variables for change #18776. p4raw-link: @18776 on //depot/perl: 83b43d9236da9ea6e31fd2df2474f4d7f7220a85 p4raw-id: //depot/perl@18777 --- op.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/op.c b/op.c index a89d29d..6a2cd37 100644 --- a/op.c +++ b/op.c @@ -2630,7 +2630,7 @@ Perl_pmruntime(pTHX_ OP *o, OP *expr, OP *repl) if (curop->op_type == OP_GV) { GV *gv = cGVOPx_gv(curop); repl_has_vars = 1; - if (strchr("&`'123456789+-", *GvENAME(gv))) + if (strchr("&`'123456789+-\016\022", *GvENAME(gv))) break; } else if (curop->op_type == OP_RV2CV) -- 2.7.4