diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-15 08:55:01 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-15 08:55:01 +0000 |
commit | a7089531ba6cec0dc577ea527da80d08bb5964dd (patch) | |
tree | 657c8b7b5140b93c07b9933aa71126c064e0fe83 /op.c | |
parent | 45447e0de895cbfedb52c0fe32f88c2291b06536 (diff) | |
download | perl-a7089531ba6cec0dc577ea527da80d08bb5964dd.tar.gz |
disable internal globbing for miniperl (or build breaks out
in a rash of failed dependencies)
p4raw-id: //depot/perl@4389
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -5181,7 +5181,7 @@ Perl_ck_glob(pTHX_ OP *o) if (!((gv = gv_fetchpv("glob", FALSE, SVt_PVCV)) && GvIMPORTED_CV(gv))) gv = gv_fetchpv("CORE::GLOBAL::glob", FALSE, SVt_PVCV); -#ifdef PERL_INTERNAL_GLOB +#if defined(PERL_INTERNAL_GLOB) && !defined(MINIPERL_BUILD) /* XXX this can be tightened up and made more failsafe. */ if (!gv) { OP *modname = newSVOP(OP_CONST, 0, newSVpvn("File::Glob", 10)); @@ -5192,7 +5192,7 @@ Perl_ck_glob(pTHX_ OP *o) gv = gv_fetchpv("CORE::GLOBAL::glob", FALSE, SVt_PVCV); LEAVE; } -#endif /* PERL_INTERNAL_GLOB */ +#endif /* PERL_INTERNAL_GLOB && !MINIPERL_BUILD */ if (gv && GvIMPORTED_CV(gv)) { append_elem(OP_GLOB, o, |