diff options
| author | Michael G. Schwern <schwern@pobox.com> | 2001-10-17 00:04:13 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-17 10:25:06 +0000 |
| commit | 60e23f2ffd1cd9673f7e06415d666f29696b7d96 (patch) | |
| tree | 3bf53504442fea83618db73188d58e9b016644d1 /vms | |
| parent | 35bf961cd9e224a6166d553c360d158bbef316a5 (diff) | |
| download | perl-60e23f2ffd1cd9673f7e06415d666f29696b7d96.tar.gz | |
Set PERL_CORE environment var
Message-ID: <20011017040413.C25550@blackrider>
p4raw-id: //depot/perl@12471
Diffstat (limited to 'vms')
| -rw-r--r-- | vms/test.com | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/vms/test.com b/vms/test.com index ce98bff0d8..6720dba357 100644 --- a/vms/test.com +++ b/vms/test.com @@ -134,6 +134,10 @@ foreach $file (@exclist) { $skip{$file}++; } $| = 1; +# Let tests know they're running in the perl core. Useful for modules +# which live dual lives on CPAN. +$ENV{PERL_CORE} = 1; + @ARGV = grep($_,@ARGV); # remove empty elements due to "''p1'" syntax if (lc($ARGV[0]) eq '-v') { |