diff options
author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2011-06-27 21:08:14 +0100 |
---|---|---|
committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2011-06-27 21:08:14 +0100 |
commit | 23525070d6c0e51f718bc1aebdc0acbadb33aa4a (patch) | |
tree | 4be114751e13d087911ece2a92573658676c2553 | |
parent | 7c2d9d03f8b64a80661ece16e7bfc15456ae3400 (diff) | |
download | perl-23525070d6c0e51f718bc1aebdc0acbadb33aa4a.tar.gz |
Push the atime and mtime of generated Makefile.PLs back 4 seconds in make_ext.pl
In certain circumstances ( on virtual machines ) the generated Makefile.PL can
produce a Makefile that is older than the Makefile.PL
Altering the atime and mtime backwards by 4 seconds seems to resolve the issue.
-rw-r--r-- | make_ext.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/make_ext.pl b/make_ext.pl index 13f892a36d..6425e37ea4 100644 --- a/make_ext.pl +++ b/make_ext.pl @@ -377,6 +377,10 @@ WriteMakefile( EOM close $fh or die "Can't close Makefile.PL: $!"; } + eval { + my $ftime = time - 4; + utime $ftime, $ftime, 'Makefile.PL'; + }; print "\nRunning Makefile.PL in $ext_dir\n"; # Presumably this can be simplified @@ -388,7 +392,7 @@ EOM # Inherited from make_ext.pl @cross = '-MCross'; } - + my @args = ("-I$lib_dir", @cross, 'Makefile.PL'); if ($is_VMS) { my $libd = VMS::Filespec::vmspath($lib_dir); |