Change 14301 by jhi@alpha on 2002/01/16 13:45:20
The non-MakeMaker.pm parts of
Subject: [PATCH] Re: MM_Beos.pm?
From: Tels <[EMAIL PROTECTED]>
Date: Mon, 14 Jan 2002 21:00:31 +0100 (CET)
Message-Id: <[EMAIL PROTECTED]>
Affected files ...
.... //depot/perl/ext/SDBM_File/sdbm/Makefile.PL#13 edit
.... //depot/perl/lib/ExtUtils/MM_Unix.pm#141 edit
.... //depot/perl/lib/ExtUtils/t/MM_Unix.t#7 edit
Differences ...
==== //depot/perl/ext/SDBM_File/sdbm/Makefile.PL#13 (text) ====
Index: perl/ext/SDBM_File/sdbm/Makefile.PL
--- perl/ext/SDBM_File/sdbm/Makefile.PL.~1~ Wed Jan 16 07:00:06 2002
+++ perl/ext/SDBM_File/sdbm/Makefile.PL Wed Jan 16 07:00:06 2002
@@ -1,6 +1,6 @@
use ExtUtils::MakeMaker;
-$define = '-DSDBM -DDUFF';
+my $define = '-DSDBM -DDUFF';
$define .= ' -DWIN32 -DPERL_STATIC_SYMS' if ($^O eq 'MSWin32');
if ($^O eq 'VMS') { # Old VAXC compiler can't handle Duff's device
==== //depot/perl/lib/ExtUtils/MM_Unix.pm#141 (text) ====
Index: perl/lib/ExtUtils/MM_Unix.pm
--- perl/lib/ExtUtils/MM_Unix.pm.~1~ Wed Jan 16 07:00:06 2002
+++ perl/lib/ExtUtils/MM_Unix.pm Wed Jan 16 07:00:06 2002
@@ -3898,14 +3898,13 @@
=item perl_archive
This is internal method that returns path to libperl.a equivalent
-to be linked to dynamic extensions. UNIX does not have one but OS2
-and Win32 do.
+to be linked to dynamic extensions. UNIX does not have one but other
+OSs might have one.
=cut
sub perl_archive
{
- return '$(PERL_INC)' . "/$Config{libperl}" if $^O eq "beos";
return "";
}
==== //depot/perl/lib/ExtUtils/t/MM_Unix.t#7 (text) ====
Index: perl/lib/ExtUtils/t/MM_Unix.t
--- perl/lib/ExtUtils/t/MM_Unix.t.~1~ Wed Jan 16 07:00:06 2002
+++ perl/lib/ExtUtils/t/MM_Unix.t Wed Jan 16 07:00:06 2002
@@ -3,6 +3,7 @@
# 2001-12-16 Tels first version
# 2002-01-13 Tels 0.02 added some tests for various functions, added Andreas
# fix to the version test (>= vs ==)
+# 2002-01-14 Tels 0.03 exclude on beos and netware, /i for $^O test
BEGIN {
chdir 't' if -d 't';
@@ -12,7 +13,7 @@
BEGIN {
use Test::More;
- if( $^O =~ /^VMS|os2|MacOS|MSWin32|cygwin$/ ) {
+ if( $^O =~ /^VMS|os2|MacOS|MSWin32|cygwin|beos|netware$/i ) {
plan skip_all => 'Non-Unix platform';
}
else {
End of Patch.
