Pārlūkot izejas kodu

* Fix compilation

Michaël Van Canneyt 2 gadi atpakaļ
vecāks
revīzija
d2c57a0d8a
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  1. 1 1
      rtl/objpas/sysutils/filutil.inc

+ 1 - 1
rtl/objpas/sysutils/filutil.inc

@@ -987,7 +987,7 @@ begin
   if Result then
      begin
      DateTime.data:=Info;
-     FindClose(FileName,0,Info)
+     FindClose(Info);
      end;
 end;
 {$ENDIF}