The following patch brings bleadperl in sync with 6.10_07.
I've noticed Robin's "long =item" patch appears to have been applied. I
don't understand what the problem is, nor can I reproduce it. Anyhow, it
sounds like a pod2man bug, not MakeMaker. So I removed it.
The only real difference between 6.10_07 and bleadperl is the perllocal.pod
fixes. I've improved on Craig's VMS perllocal fix and reversed a mistake
I made somewhere between 5.6.1 and 5.8.0 WRT the location of perllocal.pod.
I've also (hopefully) fixed the Command.t issues WRT testing in the core on
VMS.
--
Playstation? Of course Perl runs on Playstation.
-- Jarkko Hietaniemi
--- /usr/local/src/perl-current/lib/ExtUtils/Changes 2003-06-09 11:21:02.000000000
-0700
+++ Changes 2003-07-05 16:13:40.000000000 -0700
@@ -1,3 +1,18 @@
+6.10_07 Sat Jul 5 16:12:52 PDT 2003
+ * Fixing location of perllocal.pod so its always in INSTALLARCHLIB
+ instead of one for each perl, site and vendor.
+ - Sun's make treats escaped newlines oddly. Switching oneliner() back
+ to using multiple -e's.
+ * Bug in libscan() meant that any .pm containing RCS or CVS or SCCS
+ in its name (for example, RCS.pm) would be skipped.
+ - Command.t was getting confused in the core because it was reading
+ files from the core t/ directory, not MakeMaker's t/ directry.
+ - MM_OS2 PERL_ARCHIVE_AFTER test wrong for a.out systems (Ilya)
+ - Fixing perllocal.pod and XS installation on VMS. An extraneous
+ newline was introduced when changing the install macros over to
+ $(ECHO).
+ - Added $(ECHO_N) macro to emulate 'echo -n'
+
6.10_06 Sat Jun 7 00:55:29 PDT 2003
- Whoops, Liblist.t busted on VMS after I turned strict on in
ExtUtils::Liblist::Kid. Merely a test bug, not a real bug.
--- /usr/local/src/perl-current/lib/ExtUtils/MakeMaker/FAQ.pod 2003-07-01
11:14:51.000000000 -0700
+++ lib/ExtUtils/MakeMaker/FAQ.pod 2003-07-05 16:49:36.000000000 -0700
@@ -1,6 +1,6 @@
package ExtUtils::MakeMaker::FAQ;
-(our $VERSION) = sprintf "%03d", q$Revision: 1.7 $ =~ /Revision:\s+(\S+)/;
+(our $VERSION) = sprintf "%03d", q$Revision: 1.8 $ =~ /Revision:\s+(\S+)/;
1;
__END__
@@ -61,9 +61,7 @@
=over 4
-=item
-
-How do I keep my $VERSION up to date without resetting it manually?
+=item How do I keep my $VERSION up to date without resetting it manually?
Often you want to manually set the $VERSION in the main module
distribution because this is the version that everybody sees on CPAN
@@ -77,12 +75,7 @@
In CVS and RCS you use $Z<>Revision$ writing it like so:
- $VERSION = sprintf "%d.%03d", q$Revision$ =~ /(\d+)/g;
-
-On your next check in, $Z<>Revision$ will magically be expanded to contain
-the current revision #.
-
- $VERSION = sprintf "%d.%03d", q$Revision: 1.7 $ =~ /(\d+)/g;
+ $VERSION = sprintf "%d.%03d", q$Revision: 1.8 $ =~ /(\d+)/g;
Every time the file is checked in the $Z<>Revision$ will be updated,
updating your $VERSION.
@@ -95,11 +88,9 @@
complicated.
# must be all on one line or MakeMaker will get confused.
- $VERSION = do { my @r = (q$Revision$ =~ /\d+/g); sprintf "%d."."%03d" x $#r, @r };
+ $VERSION = do { my @r = (q$Revision: 1.5.3.4 $ =~ /\d+/g); sprintf "%d."."%03d" x
$#r, @r };
-=item
-
-What's this F<META.yml> thing and how did it get in my F<MANIFEST>?!
+=item What's this F<META.yml> thing and how did it get in my F<MANIFEST>?!
F<META.yml> is a module meta-data file pioneered by Module::Build and
automatically generated as part of the 'distdir' target (and thus
@@ -113,10 +104,7 @@
=over 4
-=item
-
-How to I prevent "object version X.XX does not match bootstrap parameter Y.YY"
-errors?
+=item How to I prevent "object version X.XX does not match bootstrap parameter Y.YY"
errors?
XS code is very sensitive to the module version number and will
complain if the version number in your Perl module doesn't match. If
@@ -131,9 +119,7 @@
depend => { '$(FIRST_MAKEFILE)' => '$(VERSION_FROM)' }
-=item
-
-How do I make two or more XS files coexist in the same directory?
+=item How do I make two or more XS files coexist in the same directory?
Sometimes you need to have two and more XS files in the same package.
One way to go is to put them into separate directories, but sometimes
--- /usr/local/src/perl-current/lib/ExtUtils/MM_Unix.pm 2003-06-19 08:43:31.000000000
-0700
+++ lib/ExtUtils/MM_Unix.pm 2003-07-05 16:23:30.000000000 -0700
@@ -20,7 +20,7 @@
use ExtUtils::MakeMaker qw($Verbose neatvalue);
-$VERSION = '1.36';
+$VERSION = '1.37';
require ExtUtils::MM_Any;
@ISA = qw(ExtUtils::MM_Any);
@@ -1418,7 +1418,7 @@
sub init_dirscan { # --- File and Directory Lists (.xs .pm .pod etc)
my($self) = @_;
my($name, %dir, %xs, %c, %h, %ignore, %pl_files, %manifypods);
- local(%pm); #the sub in find() has to see this hash
+ my %pm;
@ignore{qw(Makefile.PL test.pl t)} = (1,1,1);
@@ -1875,7 +1875,7 @@
Initializes EXTRALIBS, BSLOADLIBS, LDLOADLIBS, LIBS, LD_RUN_PATH,
OBJECT, BOOTDEP, PERLMAINCC, LDFROM, LINKTYPE, SHELL, NOOP,
FIRST_MAKEFILE, MAKEFILE_OLD, NOECHO, RM_F, RM_RF, TEST_F,
-TOUCH, CP, MV, CHMOD, UMASK_NULL
+TOUCH, CP, MV, CHMOD, UMASK_NULL, ECHO, ECHO_N
=cut
@@ -1936,6 +1936,7 @@
$self->{SHELL} ||= $Config{sh} || '/bin/sh';
$self->{ECHO} ||= 'echo';
+ $self->{ECHO_N} ||= 'echo -n';
$self->{RM_F} ||= "rm -f";
$self->{RM_RF} ||= "rm -rf";
$self->{TOUCH} ||= "touch";
@@ -2527,26 +2528,26 @@
>> }.$self->catfile('$(INSTALLARCHLIB)','perllocal.pod').q{
doc_site_install ::
- $(NOECHO) $(ECHO) Appending installation info to
$(INSTALLSITEARCH)/perllocal.pod
- -$(NOECHO) $(MKPATH) $(INSTALLSITEARCH)
+ $(NOECHO) $(ECHO) Appending installation info to
$(INSTALLARCHLIB)/perllocal.pod
+ -$(NOECHO) $(MKPATH) $(INSTALLARCHLIB)
-$(NOECHO) $(DOC_INSTALL) \
"Module" "$(NAME)" \
"installed into" "$(INSTALLSITELIB)" \
LINKTYPE "$(LINKTYPE)" \
VERSION "$(VERSION)" \
EXE_FILES "$(EXE_FILES)" \
- >> }.$self->catfile('$(INSTALLSITEARCH)','perllocal.pod').q{
+ >> }.$self->catfile('$(INSTALLARCHLIB)','perllocal.pod').q{
doc_vendor_install ::
- $(NOECHO) $(ECHO) Appending installation info to
$(INSTALLVENDORARCH)/perllocal.pod
- -$(NOECHO) $(MKPATH) $(INSTALLVENDORARCH)
+ $(NOECHO) $(ECHO) Appending installation info to
$(INSTALLARCHLIB)/perllocal.pod
+ -$(NOECHO) $(MKPATH) $(INSTALLARCHLIB)
-$(NOECHO) $(DOC_INSTALL) \
"Module" "$(NAME)" \
"installed into" "$(INSTALLVENDORLIB)" \
LINKTYPE "$(LINKTYPE)" \
VERSION "$(VERSION)" \
EXE_FILES "$(EXE_FILES)" \
- >> }.$self->catfile('$(INSTALLVENDORARCH)','perllocal.pod').q{
+ >> }.$self->catfile('$(INSTALLARCHLIB)','perllocal.pod').q{
};
@@ -2930,7 +2931,7 @@
' if $self->{OBJECT};
push @m, q{
-# We take a very conservative approach here, but it\'s worth it.
+# We take a very conservative approach here, but it's worth it.
# We move Makefile to Makefile.old here to avoid gnu make looping.
$(FIRST_MAKEFILE) : Makefile.PL $(CONFIGDEP)
$(NOECHO) $(ECHO) "Makefile out-of-date with respect to $?"
@@ -3888,7 +3889,8 @@
my @m;
for my $tool (qw{ SHELL CHMOD CP MV NOOP NOECHO RM_F RM_RF TEST_F TOUCH
- UMASK_NULL DEV_NULL MKPATH EQUALIZE_TIMESTAMP ECHO
+ UMASK_NULL DEV_NULL MKPATH EQUALIZE_TIMESTAMP
+ ECHO ECHO_N
UNINST VERBINST
MOD_INSTALL DOC_INSTALL UNINSTALL
WARN_IF_OLD_PACKLIST
--- /usr/local/src/perl-current/lib/ExtUtils/MM_VMS.pm 2003-07-05 02:13:40.000000000
-0700
+++ lib/ExtUtils/MM_VMS.pm 2003-07-05 16:36:59.000000000 -0700
@@ -20,8 +20,8 @@
use File::Basename;
use vars qw($Revision @ISA $VERSION);
-($VERSION) = '5.67';
-($Revision) = q$Revision: 1.97 $ =~ /Revision:\s+(\S+)/;
+($VERSION) = '5.68';
+($Revision) = q$Revision: 1.101 $ =~ /Revision:\s+(\S+)/;
require ExtUtils::MM_Any;
require ExtUtils::MM_Unix;
@@ -381,6 +381,7 @@
$self->{MAKEFILE_OLD} ||= '$(FIRST_MAKEFILE)_old';
$self->{ECHO} ||= '$(PERLRUN) -le "print [EMAIL PROTECTED]"';
+ $self->{ECHO_N} ||= '$(PERLRUN) -e "print [EMAIL PROTECTED]"';
$self->{TOUCH} ||= '$(PERLRUN) "-MExtUtils::Command" -e touch';
$self->{CHMOD} ||= '$(PERLRUN) "-MExtUtils::Command" -e chmod';
$self->{RM_F} ||= '$(PERLRUN) "-MExtUtils::Command" -e rm_f';
@@ -1531,12 +1532,12 @@
pure_perl_install ::
$(NOECHO) $(PERLRUN) "-MFile::Spec" -e "print 'read
'.File::Spec->catfile('$(PERL_ARCHLIB)','auto','$(FULLEXT)','.packlist').' '" >.MM_tmp
$(NOECHO) $(PERLRUN) "-MFile::Spec" -e "print 'write
'.File::Spec->catfile('$(INSTALLARCHLIB)','auto','$(FULLEXT)','.packlist').' '"
>>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_LIB) $(INSTALLPRIVLIB) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_ARCHLIB) $(INSTALLARCHLIB) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_BIN) $(INSTALLBIN) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_SCRIPT) $(INSTALLSCRIPT) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_MAN1DIR) $(INSTALLMAN1DIR) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_MAN3DIR) $(INSTALLMAN3DIR) ';" >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_LIB) $(INSTALLPRIVLIB) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_ARCHLIB) $(INSTALLARCHLIB) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_BIN) $(INSTALLBIN) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_SCRIPT) $(INSTALLSCRIPT) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_MAN1DIR) $(INSTALLMAN1DIR) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_MAN3DIR) $(INSTALLMAN3DIR) " >>.MM_tmp
$(NOECHO) $(MOD_INSTALL) <.MM_tmp
$(NOECHO) $(RM_F) .MM_tmp
$(NOECHO) $(WARN_IF_OLD_PACKLIST)
].$self->catfile($self->{SITEARCHEXP},'auto',$self->{FULLEXT},'.packlist').q[
@@ -1545,12 +1546,12 @@
pure_site_install ::
$(NOECHO) $(PERLRUN) "-MFile::Spec" -e "print 'read
'.File::Spec->catfile('$(SITEARCHEXP)','auto','$(FULLEXT)','.packlist').' '" >.MM_tmp
$(NOECHO) $(PERLRUN) "-MFile::Spec" -e "print 'write
'.File::Spec->catfile('$(INSTALLSITEARCH)','auto','$(FULLEXT)','.packlist').' '"
>>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_LIB) $(INSTALLSITELIB) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_ARCHLIB) $(INSTALLSITEARCH) ';"
>>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_BIN) $(INSTALLSITEBIN) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_SCRIPT) $(INSTALLSCRIPT) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_MAN1DIR) $(INSTALLSITEMAN1DIR) ';"
>>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_MAN3DIR) $(INSTALLSITEMAN3DIR) ';"
>>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_LIB) $(INSTALLSITELIB) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_ARCHLIB) $(INSTALLSITEARCH) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_BIN) $(INSTALLSITEBIN) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_SCRIPT) $(INSTALLSCRIPT) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_MAN1DIR) $(INSTALLSITEMAN1DIR) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_MAN3DIR) $(INSTALLSITEMAN3DIR) " >>.MM_tmp
$(NOECHO) $(MOD_INSTALL) <.MM_tmp
$(NOECHO) $(RM_F) .MM_tmp
$(NOECHO) $(WARN_IF_OLD_PACKLIST)
].$self->catfile($self->{PERL_ARCHLIB},'auto',$self->{FULLEXT},'.packlist').q[
@@ -1558,12 +1559,12 @@
pure_vendor_install ::
$(NOECHO) $(PERLRUN) "-MFile::Spec" -e "print 'read
'.File::Spec->catfile('$(VENDORARCHEXP)','auto','$(FULLEXT)','.packlist').' '" >.MM_tmp
$(NOECHO) $(PERLRUN) "-MFile::Spec" -e "print 'write
'.File::Spec->catfile('$(INSTALLVENDORARCH)','auto','$(FULLEXT)','.packlist').' '"
>>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_LIB) $(INSTALLVENDORLIB) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_ARCHLIB) $(INSTALLVENDORARCH) ';"
>>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_BIN) $(INSTALLVENDORBIN) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_SCRIPT) $(INSTALLSCRIPT) ';" >>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_MAN1DIR) $(INSTALLVENDORMAN1DIR) ';"
>>.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print '$(INST_MAN3DIR) $(INSTALLVENDORMAN3DIR) ';"
>>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_LIB) $(INSTALLVENDORLIB) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_ARCHLIB) $(INSTALLVENDORARCH) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_BIN) $(INSTALLVENDORBIN) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_SCRIPT) $(INSTALLSCRIPT) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_MAN1DIR) $(INSTALLVENDORMAN1DIR) " >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "$(INST_MAN3DIR) $(INSTALLVENDORMAN3DIR) " >>.MM_tmp
$(NOECHO) $(MOD_INSTALL) <.MM_tmp
$(NOECHO) $(RM_F) .MM_tmp
@@ -1571,29 +1572,29 @@
doc_perl_install ::
$(NOECHO) $(ECHO) "Appending installation info to
].$self->catfile($self->{INSTALLARCHLIB}, 'perllocal.pod').q["
$(NOECHO) $(MKPATH) $(INSTALLARCHLIB)
- $(NOECHO) $(PERLRUN) -e "print 'installed into|$(INSTALLPRIVLIB)|';" >.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print
'LINKTYPE|$(LINKTYPE)|VERSION|$(VERSION)|EXE_FILES|$(EXE_FILES) ';" >>.MM_tmp
+ $(NOECHO) $(ECHO_N) "installed into|$(INSTALLPRIVLIB)|" >.MM_tmp
+ $(NOECHO) $(ECHO_N)
"LINKTYPE|$(LINKTYPE)|VERSION|$(VERSION)|EXE_FILES|$(EXE_FILES) " >>.MM_tmp
],@exe_files,
q[ $(NOECHO) $(DOC_INSTALL) "Module" "$(NAME)" <.MM_tmp
>>].$self->catfile($self->{INSTALLARCHLIB},'perllocal.pod').q[
$(NOECHO) $(RM_F) .MM_tmp
# And again
doc_site_install ::
- $(NOECHO) $(ECHO) "Appending installation info to
].$self->catfile($self->{INSTALLSITEARCH}, 'perllocal.pod').q["
- $(NOECHO) $(MKPATH) $(INSTALLSITEARCH)
- $(NOECHO) $(PERLRUN) -e "print 'installed into|$(INSTALLSITELIB)|';" >.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print
'LINKTYPE|$(LINKTYPE)|VERSION|$(VERSION)|EXE_FILES|$(EXE_FILES) ';" >>.MM_tmp
+ $(NOECHO) $(ECHO) "Appending installation info to
].$self->catfile($self->{INSTALLARCHLIB}, 'perllocal.pod').q["
+ $(NOECHO) $(MKPATH) $(INSTALLARCHLIB)
+ $(NOECHO) $(ECHO_N) "installed into|$(INSTALLSITELIB)|" >.MM_tmp
+ $(NOECHO) $(ECHO_N)
"LINKTYPE|$(LINKTYPE)|VERSION|$(VERSION)|EXE_FILES|$(EXE_FILES) " >>.MM_tmp
],@exe_files,
-q[ $(NOECHO) $(DOC_INSTALL) "Module" "$(NAME)" <.MM_tmp
>>].$self->catfile($self->{INSTALLSITEARCH},'perllocal.pod').q[
+q[ $(NOECHO) $(DOC_INSTALL) "Module" "$(NAME)" <.MM_tmp
>>].$self->catfile($self->{INSTALLARCHLIB},'perllocal.pod').q[
$(NOECHO) $(RM_F) .MM_tmp
doc_vendor_install ::
- $(NOECHO) $(ECHO) "Appending installation info to
].$self->catfile($self->{INSTALLVENDORARCH}, 'perllocal.pod').q["
- $(NOECHO) $(MKPATH) $(INSTALLVENDORARCH)
- $(NOECHO) $(PERLRUN) -e "print 'installed into|$(INSTALLVENDORLIB)|';" >.MM_tmp
- $(NOECHO) $(PERLRUN) -e "print
'LINKTYPE|$(LINKTYPE)|VERSION|$(VERSION)|EXE_FILES|$(EXE_FILES) ';" >>.MM_tmp
+ $(NOECHO) $(ECHO) "Appending installation info to
].$self->catfile($self->{INSTALLARCHLIB}, 'perllocal.pod').q["
+ $(NOECHO) $(MKPATH) $(INSTALLARCHLIB)
+ $(NOECHO) $(ECHO_N) "installed into|$(INSTALLVENDORLIB)|" >.MM_tmp
+ $(NOECHO) $(ECHO_N)
"LINKTYPE|$(LINKTYPE)|VERSION|$(VERSION)|EXE_FILES|$(EXE_FILES) " >>.MM_tmp
],@exe_files,
-q[ $(NOECHO) $(DOC_INSTALL) "Module" "$(NAME)" <.MM_tmp
>>].$self->catfile($self->{INSTALLVENDORARCH},'perllocal.pod').q[
+q[ $(NOECHO) $(DOC_INSTALL) "Module" "$(NAME)" <.MM_tmp
>>].$self->catfile($self->{INSTALLARCHLIB},'perllocal.pod').q[
$(NOECHO) $(RM_F) .MM_tmp
];
@@ -1704,7 +1705,7 @@
] if $self->{OBJECT};
push @m,q[
-# We take a very conservative approach here, but it\'s worth it.
+# We take a very conservative approach here, but it's worth it.
# We move $(FIRST_MAKEFILE) to $(MAKEFILE_OLD) here to avoid gnu make looping.
$(FIRST_MAKEFILE) : Makefile.PL $(CONFIGDEP)
$(NOECHO) $(ECHO) "$(FIRST_MAKEFILE) out-of-date with respect to
$(MMS$SOURCE_LIST)"
@@ -2012,6 +2013,7 @@
push @m, q[
# Still more from the 255-char line length limit
doc_inst_perl :
+ $(NOECHO) $(MKPATH) $(INSTALLARCHLIB)
$(NOECHO) $(ECHO) "Perl binary $(MAP_TARGET)|" >.MM_tmp
$(NOECHO) $(ECHO) "MAP_STATIC|$(MAP_STATIC)|" >>.MM_tmp
$(NOECHO) $(PERL) -pl040 -e " "
].$self->catfile('$(INST_ARCHAUTODIR)','extralibs.all'),q[ >>.MM_tmp
--- /usr/local/src/perl-current/lib/ExtUtils/MM_Win32.pm 2003-04-07
12:35:35.000000000 -0700
+++ lib/ExtUtils/MM_Win32.pm 2003-07-05 16:13:06.000000000 -0700
@@ -29,7 +29,7 @@
require ExtUtils::MM_Any;
require ExtUtils::MM_Unix;
@ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix );
-$VERSION = '1.07';
+$VERSION = '1.08';
$ENV{EMXSHELL} = 'sh'; # to run `commands`
@@ -169,6 +169,7 @@
# Used in favor of echo because echo won't strip quotes. :(
$self->{ECHO} ||= $self->oneliner('print [EMAIL PROTECTED]', ['-l']);
+ $self->{ECHO_N} ||= $self->oneliner('print [EMAIL PROTECTED]');
$self->{TOUCH} ||= '$(PERLRUN) -MExtUtils::Command -e touch';
$self->{CHMOD} ||= '$(PERLRUN) -MExtUtils::Command -e chmod';
--- /usr/local/src/perl-current/lib/ExtUtils/META.yml 2003-06-09 11:21:02.000000000
-0700
+++ META.yml 2003-07-05 16:38:29.000000000 -0700
@@ -1,6 +1,6 @@
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: ExtUtils-MakeMaker
-version: 6.10_06
+version: 6.10_07
version_from: lib/ExtUtils/MakeMaker.pm
installdirs: perl
requires:
@@ -10,4 +10,4 @@
Pod::Man: 0
distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.10_06
+generated_by: ExtUtils::MakeMaker version 6.10_07
--- /usr/local/src/perl-current/lib/ExtUtils/t/Command.t 2003-06-19
09:08:38.000000000 -0700
+++ t/Command.t 2003-06-10 21:46:55.000000000 -0700
@@ -31,11 +31,14 @@
}
{
- # get a file in the current directory, replace last char with wildcard
+ # get a file in the MM test directory, replace last char with wildcard
my $file;
{
local *DIR;
- opendir(DIR, File::Spec->curdir());
+ my $mmtestdir = $ENV{PERL_CORE}
+ ? File::Spec->catdir(File::Spec->updir, 'lib', 'ExtUtils', 't')
+ : File::Spec->curdir;
+ opendir(DIR, $mmtestdir);
while ($file = readdir(DIR)) {
$file =~ s/\.\z// if $^O eq 'VMS';
last if $file =~ /^\w/;
