diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-19 06:53:13 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-19 06:53:13 +0000 |
commit | 4673fc70de29ec9782a54acc86b498189e02a8e2 (patch) | |
tree | 0e2830f6feab909c595c2f646618b170fc8c28bf /op.c | |
parent | 657b208b434818aa5e54d68b0a8ad320c0252adf (diff) | |
download | perl-4673fc70de29ec9782a54acc86b498189e02a8e2.tar.gz |
s/WARN_PRECEDENCE/WARN_BAREWORD/, vide change#5131
p4raw-link: @5131 on //depot/perl: 34d09196f6a006314d7ea49a091a30ce5ee08bff
p4raw-id: //depot/perl@5135
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3514,8 +3514,8 @@ S_new_logop(pTHX_ I32 type, I32 flags, OP** firstp, OP** otherp) } } if (first->op_type == OP_CONST) { - if (ckWARN(WARN_PRECEDENCE) && (first->op_private & OPpCONST_BARE)) - Perl_warner(aTHX_ WARN_PRECEDENCE, "Bareword found in conditional"); + if (ckWARN(WARN_BAREWORD) && (first->op_private & OPpCONST_BARE)) + Perl_warner(aTHX_ WARN_BAREWORD, "Bareword found in conditional"); if ((type == OP_AND) == (SvTRUE(((SVOP*)first)->op_sv))) { op_free(first); *firstp = Nullop; |