diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2010-10-29 22:55:07 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2010-10-29 22:55:07 -0700 |
| commit | eed1db8ec8a09c4884b9038cda1149ba7778d7bd (patch) | |
| tree | 0baa34da876758c5ecd358907f208c39692d8395 /ext/mro | |
| parent | c4842d1d15ea656de7335f8bcb5acceaf4646f6f (diff) | |
| download | perl-eed1db8ec8a09c4884b9038cda1149ba7778d7bd.tar.gz | |
Switch S_mro_get_linear_isa_c3 to HvENAME
Diffstat (limited to 'ext/mro')
| -rw-r--r-- | ext/mro/mro.xs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ext/mro/mro.xs b/ext/mro/mro.xs index 00c960dd22..fb28399f77 100644 --- a/ext/mro/mro.xs +++ b/ext/mro/mro.xs @@ -37,7 +37,8 @@ S_mro_get_linear_isa_c3(pTHX_ HV* stash, U32 level) assert(HvAUX(stash)); - stashhek = HvNAME_HEK(stash); + stashhek = HvENAME_HEK(stash); + if (!stashhek) stashhek = HvNAME_HEK(stash); if (!stashhek) Perl_croak(aTHX_ "Can't linearize anonymous symbol table"); |