X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/8ce7a7e8b08f04e70601dd7b8717af879a4ea397..53f73940f58aac9347477bba3db29ef6b23ad573:/write_buildcustomize.pl diff --git a/write_buildcustomize.pl b/write_buildcustomize.pl index cf429a9..5d819b5 100644 --- a/write_buildcustomize.pl +++ b/write_buildcustomize.pl @@ -28,10 +28,10 @@ if ( @ARGV ) { my @toolchain = qw(cpan/AutoLoader/lib dist/Carp/lib dist/PathTools dist/PathTools/lib - dist/ExtUtils-Command/lib - dist/ExtUtils-Install/lib + cpan/ExtUtils-Command/lib + cpan/ExtUtils-Install/lib cpan/ExtUtils-MakeMaker/lib - dist/ExtUtils-Manifest/lib + cpan/ExtUtils-Manifest/lib cpan/File-Path/lib ext/re dist/Term-ReadLine/lib @@ -80,6 +80,7 @@ print $fh <<"EOT" or $error = "Can't print to $file: $!"; ${\($^O eq 'MSWin32' ? '${^WIN32_SLOPPY_STAT} = 1;':'')} splice(\@INC, 0, 1, $inc); \$^O = '$osname'; +__END__ EOT if ($error) { @@ -100,9 +101,4 @@ unlink $file or warn "Can't unlink $file after error: $!"; die $error; -# Local variables: -# cperl-indent-level: 4 -# indent-tabs-mode: nil -# End: -# # ex: set ts=8 sts=4 sw=4 et: