Missing % in format string

p4raw-id: //depot/perl@28993

diff --git a/perl.h b/perl.h
index 3338ea2..521610f 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -3969,7 +3969,7 @@ EXTCONST char PL_no_usym[]
 EXTCONST char PL_no_aelem[]
   INIT("Modification of non-creatable array value attempted, subscript %d");
 EXTCONST char PL_no_helem_sv[]
-  INIT("Modification of non-creatable hash value attempted, subscript \""SVf"\"");
+  INIT("Modification of non-creatable hash value attempted, subscript \"%"SVf"\"");
 EXTCONST char PL_no_modify[]
   INIT("Modification of a read-only value attempted");
 EXTCONST char PL_no_mem[]