summaryrefslogtreecommitdiff
path: root/mro.c
diff options
context:
space:
mode:
authorBrian Fraser <fraserbn@gmail.com>2011-07-07 04:35:35 -0300
committerFather Chrysostomos <sprout@cpan.org>2011-10-06 13:01:15 -0700
commit7ad9a4ff6c24efeda9bfd78912af50821bb2bada (patch)
tree37e22a60d7ea81d30f7959aff00851b95d64f7d6 /mro.c
parent119cacd042954e89b0fa6f0ac0f043feeb8a2e9c (diff)
downloadperl-7ad9a4ff6c24efeda9bfd78912af50821bb2bada.tar.gz
mro.(c|xs): Make warnings utf8-clean
Diffstat (limited to 'mro.c')
-rw-r--r--mro.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/mro.c b/mro.c
index c7f7538d61..d22b3ca0bc 100644
--- a/mro.c
+++ b/mro.c
@@ -224,8 +224,8 @@ S_mro_get_linear_isa_dfs(pTHX_ HV *stash, U32 level)
Perl_croak(aTHX_ "Can't linearize anonymous symbol table");
if (level > 100)
- Perl_croak(aTHX_ "Recursive inheritance detected in package '%s'",
- HEK_KEY(stashhek));
+ Perl_croak(aTHX_ "Recursive inheritance detected in package '%"SVf"'",
+ SVfARG(sv_2mortal(newSVhek(stashhek))));
meta = HvMROMETA(stash);