Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Mantis 0006055: GetFileLastWrite calls GetFileInformation two times

  • Loading branch information...
commit d7f844c45a2a90b08858145d52e32331e0fbbe53 1 parent bf58bdc
@jfudickar jfudickar authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  jcl/source/common/JclFileUtils.pas
View
2  jcl/source/common/JclFileUtils.pas
@@ -4117,7 +4117,7 @@ function GetFileLastWrite(const FileName: string; out LocalTime: TDateTime): Boo
begin
Result := GetFileInformation(FileName, FileInfo);
if Result then
- LocalTime := FileTimeToLocalDateTime(GetFileInformation(FileName).FindData.ftLastWriteTime);
+ LocalTime := FileTimeToLocalDateTime(FileInfo.FindData.ftLastWriteTime);
end;
{$ENDIF MSWINDOWS}
Please sign in to comment.
Something went wrong with that request. Please try again.