Fix for
authorarbor@al37al08.telecel.pt <arbor@al37al08.telecel.pt>
Tue, 16 Jan 2001 11:43:02 +0000 (11:43 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Tue, 31 Jul 2001 23:47:57 +0000 (23:47 +0000)
commit96a91e01636d3050d38ae3373a362c7d47a6647e
tree6a3c0642b4dd9b32f6b19d1da6b11eee40d35e42
parentdd2de2428c82c0bebb0eff93f4834d1900219f57
Fix for

Subject: [ID 20010116.001] File::Copy truncates orig file
Message-Id: <200101161143.AA11184@al37al08.telecel.pt>

(copy($foo, $foo) would truncate $foo)

p4raw-id: //depot/perl@11526
lib/File/Copy.pm
lib/File/Copy.t