فهرست منبع

* Fix compilation

(cherry picked from commit fead1ce8187a3c7173a3341ebee731825cf6ebaa)
Michaël Van Canneyt 2 سال پیش
والد
کامیت
8f233d5bb7
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      rtl/objpas/sysutils/filutil.inc

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

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