Fix the NAME in two old perlXYZdelta.pod files

[p5sagit/p5-mst-13.2.git] / op.c

diff --git a/op.c b/op.c
index 5619622..c4289ce 100644 (file)
--- a/op.c
+++ b/op.c
@@ -8369,6 +8369,7 @@ Perl_ck_each(pTHX_ OP *o)
    container of the rep_op var */
 STATIC OP *
 S_opt_scalarhv(pTHX_ OP *rep_op) {
+    dVAR;
     UNOP *unop;
 
     PERL_ARGS_ASSERT_OPT_SCALARHV;