diff options
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/universal.c b/universal.c index 172b3d0f8a..6999adce22 100644 --- a/universal.c +++ b/universal.c @@ -62,7 +62,7 @@ S_isa_lookup(pTHX_ HV *stash, const char *name, const HV* const name_stash, while (items--) { SV* const basename_sv = *svp++; HV* basestash = gv_stashsv(basename_sv, 0); - if (!basestash) { + if (!basestash || (HvMROMETA(basestash)->fake && !HvFILL(basestash))) { if (ckWARN(WARN_SYNTAX)) Perl_warner(aTHX_ packWARN(WARN_SYNTAX), "Can't locate package %"SVf" for the parents of %s", |