From: Tim Bunce <Tim.Bunce@ig.co.uk>
Date: Mon, 18 Nov 1996 06:06:15 +0000 (+1200)
Subject: Make C<no FOO> fail if C<unimport FOO> fails
X-Git-Tag: accepted/trunk/20130322.191538~38041^2~654
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=702887b4a5a2910b8748d5548b600d2dfe870f32;p=platform%2Fupstream%2Fperl.git

Make C<no FOO> fail if C<unimport FOO> fails
---

diff --git a/gv.c b/gv.c
index a7cee3f..e825187 100644
--- a/gv.c
+++ b/gv.c
@@ -276,7 +276,7 @@ char* name;
     if (!gv) {
 	CV* cv;
 
-	if (strEQ(name,"import") || strEQ(name,"unimport"))
+	if (strEQ(name,"import"))
 	    gv = (GV*)&sv_yes;
 	else if (strNE(name, "AUTOLOAD")) {
 	    gv = gv_fetchmeth(stash, "AUTOLOAD", 8, 0);