From: Robin Barker <RMBarker@cpan.org>
Date: Thu, 3 Jan 2002 14:49:06 +0000 (+0000)
Subject: Message-Id: <200201031449.OAA26137@tempest.npl.co.uk>
X-Git-Tag: perl-5.7.3~786
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/d5afce772893fe92cef0682fe9672d2589df7ab5

Message-Id: <200201031449.OAA26137@tempest.npl.co.uk>

-Wformat check.

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

diff --git a/hv.c b/hv.c
index a5884e5..99f512b 100644
--- a/hv.c
+++ b/hv.c
@@ -11,6 +11,10 @@
  * "I sit beside the fire and think of all that I have seen."  --Bilbo
  */
 
+/* 
+=head1 Hash Manipulation Functions
+*/
+
 #include "EXTERN.h"
 #define PERL_IN_HV_C
 #include "perl.h"
@@ -142,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 '%_' in fixed hash",sv);
+    Perl_croak(aTHX_ "Attempt to access to key '%"SVf"' in fixed hash",sv);
 }
 
 /* (klen == HEf_SVKEY) is special for MAGICAL hv entries, meaning key slot