summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorBram <perl-rt@wizbit.be>2008-05-16 21:14:11 -0700
committerNicholas Clark <nick@ccl4.org>2008-05-21 07:11:50 +0000
commit82afe9c18363bd69569586e69b61c267f3be9973 (patch)
tree1ba3c449db61403a75e8648b0f0e6a022a17c4e6 /op.c
parent86697e543f70346e231faa3f95bb00996b980b1e (diff)
downloadperl-82afe9c18363bd69569586e69b61c267f3be9973.tar.gz
Integrate:
[ 33849] Subject: [perl #38955] exists(): error message on wrong argument type is incorrect (5.8.7 cygwin) From: "Bram via RT" <perlbug-followup@perl.org> Message-ID: <rt-3.6.HEAD-11257-1211022849-1634.38955-15-0@perl.org> [ 33891] metabatman fails the "this patch is self-documenting" test. Restore (roughly) the original parameter names. p4raw-link: @33891 on //depot/perl: 99978bb4f628eeae8af4cb3f5bf7d42e615e2d36 p4raw-link: @33849 on //depot/perl: b0fdf69ec50f40b936b80fb258d82bfc8e867346 p4raw-id: //depot/maint-5.10/perl@33895 p4raw-integrated: from //depot/perl@33894 'merge in' pod/perldiag.pod (@32990..) hv.h (@33051..) op.c (@33766..)
Diffstat (limited to 'op.c')
-rw-r--r--op.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/op.c b/op.c
index 155db4f2c7..653748dc7c 100644
--- a/op.c
+++ b/op.c
@@ -6339,7 +6339,7 @@ Perl_ck_exists(pTHX_ OP *o)
else if (kid->op_type == OP_AELEM)
o->op_flags |= OPf_SPECIAL;
else if (kid->op_type != OP_HELEM)
- Perl_croak(aTHX_ "%s argument is not a HASH or ARRAY element",
+ Perl_croak(aTHX_ "%s argument is not a HASH or ARRAY element or a subroutine",
OP_DESC(o));
op_null(kid);
}