diff options
| author | Paul Green <Paul.Green@stratus.com> | 2002-01-11 12:30:37 -0500 |
|---|---|---|
| committer | Abhijit Menon-Sen <ams@wiw.org> | 2002-01-12 06:10:52 +0000 |
| commit | cf346138d65ead98b6b0db39f170b648fd861ca2 (patch) | |
| tree | f2697dd148e8a82f9d855778498054430fd94074 | |
| parent | 2371fea9e14a724e668c4f56ab57c9078e9bdee5 (diff) | |
| download | perl-cf346138d65ead98b6b0db39f170b648fd861ca2.tar.gz | |
More fixes for Stratus VOS
Message-Id: <95AE3CDB3543D511883A0020485B38B9023534D3@exna3.stratus.com>
p4raw-id: //depot/perl@14212
| -rw-r--r-- | hints/vos.sh | 3 | ||||
| -rw-r--r-- | lib/ExtUtils/MM_Unix.pm | 16 |
2 files changed, 14 insertions, 5 deletions
diff --git a/hints/vos.sh b/hints/vos.sh index 52523be46e..f4e97003b6 100644 --- a/hints/vos.sh +++ b/hints/vos.sh @@ -71,3 +71,6 @@ pager="/system/gnu_library/bin/cat.pm" # VOS has a bug that causes _exit() to flush all files. # This confuses the tests. Make 'em happy here. fflushNULL=define + +# VOS has a link() function but it is a dummy. +d_link="undef" diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm index 6c08d9a2c6..82b8f69dc7 100644 --- a/lib/ExtUtils/MM_Unix.pm +++ b/lib/ExtUtils/MM_Unix.pm @@ -11,7 +11,7 @@ use strict; our ($Is_Mac,$Is_OS2,$Is_VMS,$Is_Win32,$Is_Dos, $Verbose,%pm,%static,$Xsubpp_Version); -our $VERSION = '1.12604'; +our $VERSION = '1.12605'; require ExtUtils::MakeMaker; ExtUtils::MakeMaker->import(qw($Verbose &neatvalue)); @@ -1613,10 +1613,11 @@ sub init_dirscan { # --- File and Directory Lists (.xs .pm .pod etc) =item init_main -Initializes NAME, FULLEXT, BASEEXT, PARENT_NAME, DLBASE, PERL_SRC, -PERL_LIB, PERL_ARCHLIB, PERL_INC, INSTALLDIRS, INST_*, INSTALL*, -PREFIX, CONFIG, AR, AR_STATIC_ARGS, LD, OBJ_EXT, LIB_EXT, EXE_EXT, MAP_TARGET, -LIBPERL_A, VERSION_FROM, VERSION, DISTNAME, VERSION_SYM. +Initializes AR, AR_STATIC_ARGS, BASEEXT, CONFIG, DISTNAME, DLBASE, +EXE_EXT, FULLEXT, FULLPERL, INST_*, INSTALL*, INSTALLDIRS, LD, +LIB_EXT, LIBPERL_A, MAP_TARGET, NAME, OBJ_EXT, PARENT_NAME, PERL, +PERL_ARCHLIB, PERL_INC, PERL_LIB, PERL_SRC, PERLRUN, PERLRUNINST, +PREFIX, TEST_LIBS, VERSION, VERSION_FROM, VERSION_SYM, XS_VERSION. =cut @@ -2037,6 +2038,11 @@ usually solves this kind of problem. push @perls, 'miniperl'; } + # Build up a set of file names (not command names). + foreach $element (@perls) { + $element .= "$Config{exe_ext}"; + } + $self->{PERL} ||= $self->find_perl(5.0, \@perls, \@defpath, $Verbose ); # don't check if perl is executable, maybe they have decided to |