only negative cache a method lookup if we look at UNIVERSAL

1 files changed, 1 insertions, 1 deletions

diff --git a/gv.c b/gv.c
index 556878505c..d14eaa0655 100644
--- a/gv.c
+++ b/gv.c
@@ -983,7 +983,7 @@ S_gv_fetchmeth_internal(pTHX_ HV* stash, SV* meth, const char* name, STRLEN len,
         }
     }
 
-    if (topgv && GvREFCNT(topgv) == 1) {
+    if (topgv && GvREFCNT(topgv) == 1 && !(flags & GV_NOUNIVERSAL)) {
         /* cache the fact that the method is not defined */
         GvCVGEN(topgv) = topgen_cmp;
     }