This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Extract a constructor.
[perl5.git] / Cross / installperl.patch
CommitLineData
136febd5
JH
1--- ../installperl 2003-08-31 11:58:48.000000000 -0500
2+++ installperl 2003-09-05 02:38:40.000000000 -0500
6a809565
JH
3@@ -3,8 +3,8 @@
4 BEGIN {
5 require 5.004;
e4568ebb 6 chdir '..' if !-d 'lib' and -d '../lib';
6a809565
JH
7- @INC = 'lib';
8- $ENV{PERL5LIB} = 'lib';
9+# @INC = 'lib';
10+# $ENV{PERL5LIB} = 'lib';
11 }
12
13 use strict;
e4568ebb 14@@ -946,7 +946,7 @@
e42fa77b
JH
15 print " " if (@opts);
16 print "$file\n";
17 }
18- system("strip", @opts, $file);
19+ system("XXSTRIPXX-strip", @opts, $file);
20 } else {
21 print "# file '$file' skipped\n" if $verbose;
22 }