diff options
| author | Mark-Jason Dominus <mjd@plover.com> | 2000-03-24 15:24:34 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-02 22:49:16 +0000 |
| commit | 2f6e0fe7d26717f8593eb338bc843bd8e5f48e27 (patch) | |
| tree | 464916c6f10a7fbced30916812cedd0e9178fd65 /gv.c | |
| parent | a85d93d9d5c06911d843f281439a8d3e65aeb165 (diff) | |
| download | perl-2f6e0fe7d26717f8593eb338bc843bd8e5f48e27.tar.gz | |
Allow "no Module;" even if there is no 'unimport'.
Subject: [ID 20000324.029] `unimport' is not special the way `import' is
Message-Id: <20000324152434.15160.qmail@plover.com>
p4raw-id: //depot/perl@6499
Diffstat (limited to 'gv.c')
| -rw-r--r-- | gv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -372,7 +372,7 @@ Perl_gv_fetchmethod_autoload(pTHX_ HV *stash, const char *name, I32 autoload) gv = gv_fetchmeth(stash, name, nend - name, 0); if (!gv) { - if (strEQ(name,"import")) + if (strEQ(name,"import") || strEQ(name,"unimport")) gv = (GV*)&PL_sv_yes; else if (autoload) gv = gv_autoload4(stash, name, nend - name, TRUE); |