diff options
author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-12-03 12:51:02 +0000 |
---|---|---|
committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-12-03 12:51:02 +0000 |
commit | a6bd83f0a15d2730a2e1d4ba3319cc912869b7f3 (patch) | |
tree | 0d1f7ecf43b83db2af484a8c710efe8675ead5fe | |
parent | 7211588c6aa4629aa6b38db94c2ae732db5ef8c7 (diff) | |
download | perl-a6bd83f0a15d2730a2e1d4ba3319cc912869b7f3.tar.gz |
Avoid eqtime() wiping the file (as suggested by
"Luis G. Uribe C." <GUribe@SoftHome.net>
p4raw-id: //depot/perlio@18240
-rw-r--r-- | lib/ExtUtils/Command.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ExtUtils/Command.pm b/lib/ExtUtils/Command.pm index 6593ab3a35..829de168fa 100644 --- a/lib/ExtUtils/Command.pm +++ b/lib/ExtUtils/Command.pm @@ -78,7 +78,7 @@ Sets modified time of dst to that of src sub eqtime { my ($src,$dst) = @ARGV; - open(F,">$dst"); + open(F,">>$dst"); close(F); utime((stat($src))[8,9],$dst); } |