diff options
author | Tim Bunce <Tim.Bunce@ig.co.uk> | 1996-11-18 18:06:15 +1200 |
---|---|---|
committer | Chip Salzenberg <chip@atlantic.net> | 1996-11-19 14:16:00 +1200 |
commit | 702887b4a5a2910b8748d5548b600d2dfe870f32 (patch) | |
tree | 079f11398142aafbe6c8879568c89d652cef6701 | |
parent | 0aa93af6249a8aa09fbd69044d00e2d763922554 (diff) | |
download | perl-702887b4a5a2910b8748d5548b600d2dfe870f32.tar.gz |
Make C<no FOO> fail if C<unimport FOO> fails
-rw-r--r-- | gv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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); |