This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
"Attempt to access to key"?
[perl5.git] / hv.c
diff --git a/hv.c b/hv.c
index e1387b6..e4cc6c9 100644 (file)
--- 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