diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/ExtUtils/MM_Unix.pm | 9 | ||||
| -rw-r--r-- | lib/File/Find.pm | 4 | ||||
| -rw-r--r-- | lib/File/Temp.pm | 3 |
3 files changed, 9 insertions, 7 deletions
diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm index 33bb5dc1f6..678c441fae 100644 --- a/lib/ExtUtils/MM_Unix.pm +++ b/lib/ExtUtils/MM_Unix.pm @@ -13,14 +13,14 @@ use DirHandle; use vars qw($VERSION @ISA $Is_OS2 $Is_VMS $Is_Win32 $Is_Win95 $Is_Dos $Is_VOS $Is_QNX $Is_AIX $Is_OSF $Is_IRIX $Is_NetBSD $Is_BSD - $Is_SunOS4 $Is_Solaris $Is_SunOS + $Is_SunOS4 $Is_Solaris $Is_SunOS $Is_Interix $Verbose %pm %Config_Override ); use ExtUtils::MakeMaker qw($Verbose neatvalue); -$VERSION = '1.46'; +$VERSION = '1.46_01'; require ExtUtils::MM_Any; @ISA = qw(ExtUtils::MM_Any); @@ -36,10 +36,11 @@ $Is_AIX = $^O eq 'aix'; $Is_OSF = $^O eq 'dec_osf'; $Is_IRIX = $^O eq 'irix'; $Is_NetBSD = $^O eq 'netbsd'; +$Is_Interix = $^O eq 'interix'; $Is_SunOS4 = $^O eq 'sunos'; $Is_Solaris = $^O eq 'solaris'; $Is_SunOS = $Is_SunOS4 || $Is_Solaris; -$Is_BSD = $^O =~ /^(?:free|net|open)bsd|bsdos$/; +$Is_BSD = $^O =~ /^(?:free|net|open)bsd|bsdos|interix$/; =head1 NAME @@ -1084,7 +1085,7 @@ $(INST_DYNAMIC): $(OBJECT) $(MYEXTLIB) $(BOOTSTRAP) blibdirs.ts $(EXPORT_LIST) $ my $libs = '$(LDLOADLIBS)'; - if ($Is_NetBSD && $Config{'useshrplib'}) { + if (($Is_NetBSD || $Is_Interix) && $Config{'useshrplib'}) { # Use nothing on static perl platforms, and to the flags needed # to link against the shared libperl library on shared perl # platforms. We peek at lddlflags to see if we need -Wl,-R diff --git a/lib/File/Find.pm b/lib/File/Find.pm index e25d9d8c05..f2cecc1308 100644 --- a/lib/File/Find.pm +++ b/lib/File/Find.pm @@ -3,7 +3,7 @@ use 5.006; use strict; use warnings; use warnings::register; -our $VERSION = '1.08'; +our $VERSION = '1.09'; require Exporter; require Cwd; @@ -1236,7 +1236,7 @@ $File::Find::current_dir = File::Spec->curdir || '.'; $File::Find::dont_use_nlink = 1 if $^O eq 'os2' || $^O eq 'dos' || $^O eq 'amigaos' || $^O eq 'MSWin32' || - $^O eq 'cygwin' || $^O eq 'epoc' || $^O eq 'qnx' || + $^O eq 'interix' || $^O eq 'cygwin' || $^O eq 'epoc' || $^O eq 'qnx' || $^O eq 'nto'; # Set dont_use_nlink in your hint file if your system's stat doesn't diff --git a/lib/File/Temp.pm b/lib/File/Temp.pm index 4b9203310a..490e9e49cc 100644 --- a/lib/File/Temp.pm +++ b/lib/File/Temp.pm @@ -175,7 +175,7 @@ Exporter::export_tags('POSIX','mktemp'); # Version number -$VERSION = '0.14'; +$VERSION = '0.14_01'; # This is a list of characters that can be used in random filenames @@ -2012,6 +2012,7 @@ The value is only relevant when C<safe_level> is set to MEDIUM or higher. { my $TopSystemUID = 10; + $TopSystemUID = 197108 if $^O eq 'interix'; # "Administrator" sub top_system_uid { my $self = shift; if (@_) { |