summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorRicardo Signes <rjbs@cpan.org>2014-01-14 08:34:19 -0500
committerRicardo Signes <rjbs@cpan.org>2014-01-14 09:33:02 -0500
commitd401967c52db1a9a5958b708005a5be96d545f55 (patch)
tree4ca9daf52a6ef13995b029b2694147370d766295 /op.c
parent1df6869d4e6a2f5ae04d9304cae006ce6cf7bf96 (diff)
downloadperl-d401967c52db1a9a5958b708005a5be96d545f55.tar.gz
rename aggref warnings to autoderef
Diffstat (limited to 'op.c')
-rw-r--r--op.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/op.c b/op.c
index c8bfca43df..bf4a15760a 100644
--- a/op.c
+++ b/op.c
@@ -9109,7 +9109,7 @@ Perl_ck_fun(pTHX_ OP *o)
scalar(kid);
/* diag_listed_as: push on reference is experimental */
Perl_ck_warner_d(aTHX_
- packWARN(WARN_EXPERIMENTAL__AGGREF),
+ packWARN(WARN_EXPERIMENTAL__AUTODEREF),
"%s on reference is experimental",
PL_op_desc[type]);
}
@@ -10953,7 +10953,7 @@ Perl_ck_each(pTHX_ OP *o)
/* if treating as a reference, defer additional checks to runtime */
if (o->op_type == ref_type) {
/* diag_listed_as: keys on reference is experimental */
- Perl_ck_warner_d(aTHX_ packWARN(WARN_EXPERIMENTAL__AGGREF),
+ Perl_ck_warner_d(aTHX_ packWARN(WARN_EXPERIMENTAL__AUTODEREF),
"%s is experimental", PL_op_desc[ref_type]);
return o;
}