From 32777db77ef3ebe0f903c9762d2dd94575f9b4a6 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Thu, 23 Feb 2006 17:45:55 +0000
Subject: In XS_attributes__guess_stash, attempting to call Gv* on a PVMG is
 bad and wrong.

p4raw-id: //depot/perl@27288
---
 xsutils.c | 4 ----
 1 file changed, 4 deletions(-)

(limited to 'xsutils.c')

diff --git a/xsutils.c b/xsutils.c
index 59a249616b..94d765243c 100644
--- a/xsutils.c
+++ b/xsutils.c
@@ -278,10 +278,6 @@ usage:
 	    else if (/* !CvANON(sv) && */ CvSTASH(sv))
 		stash = CvSTASH(sv);
 	    break;
-	case SVt_PVMG:
-	    if (!(SvFAKE(sv) && SvTIED_mg(sv, PERL_MAGIC_glob)))
-		break;
-	    /*FALLTHROUGH*/
 	case SVt_PVGV:
 	    if (GvGP(sv) && GvESTASH((GV*)sv))
 		stash = GvESTASH((GV*)sv);
-- 
cgit v1.2.1