diff options
| author | Michael G. Schwern <schwern@pobox.com> | 1999-10-03 09:54:23 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-10-03 17:50:59 +0000 |
| commit | 88e9b055d1d2b36d019a3b541f111de4d9b71e3e (patch) | |
| tree | bb12c08e6d07189374337e1c6ed163a2c8871ef9 /op.c | |
| parent | ab612ae322acd4d9f3012a98d8fef7a541ccdeca (diff) | |
| download | perl-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 'op.c')
| -rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -6141,7 +6141,7 @@ Perl_peep(pTHX_ register OP *o) key = SvPV(*svp, keylen); indsvp = hv_fetch(GvHV(*fields), key, keylen, FALSE); if (!indsvp) { - Perl_croak(aTHX_ "No such field \"%s\" in variable %s of type %s", + Perl_croak(aTHX_ "No such pseudo-hash field \"%s\" in variable %s of type %s", key, SvPV(lexname, n_a), HvNAME(SvSTASH(lexname))); } ind = SvIV(*indsvp); |