From fead1ce8187a3c7173a3341ebee731825cf6ebaa Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= <michael@freepascal.org>
Date: Tue, 31 Jan 2023 19:39:30 +0100
Subject: [PATCH] * Fix compilation

---
 rtl/objpas/sysutils/filutil.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtl/objpas/sysutils/filutil.inc b/rtl/objpas/sysutils/filutil.inc
index 1a90e1e17d..01f05a0a2e 100644
--- a/rtl/objpas/sysutils/filutil.inc
+++ b/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}