From: Michael G. Schwern <schwern@pobox.com>
Date: Tue, 26 Feb 2002 01:01:28 +0000 (-0500)
Subject: "Attempt to access to key"?
X-Git-Tag: perl-5.7.3~133
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/d496d686b582057a5ea25b09da7dd67592a7e1c0

"Attempt to access to key"?
   Message-Id: <20020226060128.GA2439@blackrider>

p4raw-id: //depot/perl@14882
---

diff --git a/hv.c b/hv.c
index e1387b6..e4cc6c9 100644
--- a/hv.c
+++ b/hv.c
@@ -146,7 +146,7 @@ Perl_hv_notallowed(pTHX_ bool is_utf8, const char *key, I32 klen,
     if (is_utf8) {
 	SvUTF8_on(sv);
     }
-    Perl_croak(aTHX_ "Attempt to access to key '%"SVf"' in fixed hash",sv);
+    Perl_croak(aTHX_ "Attempt to access key '%"SVf"' in fixed hash",sv);
 }
 
 /* (klen == HEf_SVKEY) is special for MAGICAL hv entries, meaning key slot
diff --git a/pod/perldiag.pod b/pod/perldiag.pod
index acd5fc2..56c843e 100644
--- a/pod/perldiag.pod
+++ b/pod/perldiag.pod
@@ -187,7 +187,7 @@ know which context to supply to the right side.
 (F) When C<vec> is called in an lvalue context, the second argument must be
 greater than or equal to zero.
 
-=item Attempt to access to key '%_' in fixed hash
+=item Attempt to access key '%_' in fixed hash
 
 (F) A hash has been marked as READONLY at the C level to turn it
 into a "record" with a fixed set of keys. The failing code