summaryrefslogtreecommitdiff
path: root/av.c
diff options
context:
space:
mode:
authorMichael G. Schwern <schwern@pobox.com>1999-10-03 09:54:23 -0400
committerJarkko Hietaniemi <jhi@iki.fi>1999-10-03 17:50:59 +0000
commit88e9b055d1d2b36d019a3b541f111de4d9b71e3e (patch)
treebb12c08e6d07189374337e1c6ed163a2c8871ef9 /av.c
parentab612ae322acd4d9f3012a98d8fef7a541ccdeca (diff)
downloadperl-88e9b055d1d2b36d019a3b541f111de4d9b71e3e.tar.gz
A better version of #4296.
To: perl5-porters@perl.org Subject: [PATCH av.c, op.c, perldiag.pod] "array field" -> "pseudo-hash field" Message-ID: <19991003135423.A3050@blackrider> p4raw-id: //depot/cfgperl@4297
Diffstat (limited to 'av.c')
-rw-r--r--av.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/av.c b/av.c
index 6301043ac7..8f3b4f8bda 100644
--- a/av.c
+++ b/av.c
@@ -634,7 +634,7 @@ Perl_avhv_fetch_ent(pTHX_ AV *av, SV *keysv, I32 lval, U32 hash)
he = hv_fetch_ent(keys, keysv, FALSE, hash);
if (!he)
- Perl_croak(aTHX_ "No such pseudo-hash field '%s'", SvPV(keysv,n_a));
+ Perl_croak(aTHX_ "No such pseudo-hash field \"%s\"", SvPV(keysv,n_a));
return av_fetch(av, avhv_index_sv(HeVAL(he)), lval);
}