paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-29 09:50:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: CopyFile: fixed setting file time on *nix (issue #11912)

Browse Source 
git-svn-id: trunk@16111 -
This commit is contained in:
vincents 2008-08-18 10:40:34 +00:00
parent 145802bcea
commit 520a6b0648
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/include/fileutil.inc
View File

@ -1093,7 +1093,7 @@ begin
try
DestFS.CopyFrom(SrcFS,SrcFS.Size);
if PreserveTime then
FileSetDate(DestFS.Handle, FileGetDate(SrcFS.Handle));
FileSetDate(DestFilename, FileGetDate(SrcFS.Handle));
finally
DestFS.Free;
end;