* typo fix in block unstressed on Unix.

git-svn-id: http://svn.freepascal.org/svn/fpc/branches/unicode@24721 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 2 insertions, 2 deletions

diff --git a/rtl/objpas/sysutils/filutil.inc b/rtl/objpas/sysutils/filutil.inc
index fbbac4f148..8a14e9ab2e 100644
--- a/rtl/objpas/sysutils/filutil.inc
+++ b/rtl/objpas/sysutils/filutil.inc
@@ -307,7 +307,7 @@ end;
 Function ExeSearch (Const Name : RawByteString; Const DirList : RawByteString ='' ) : RawByteString;
 
 begin
-  Result:=ToSingleByteFileSystemEncodedFileName(ExeSearch(UnicodeString(Name),UnicodeString(Dirlist));
+  Result:=ToSingleByteFileSystemEncodedFileName(ExeSearch(UnicodeString(Name),UnicodeString(Dirlist)));
 end;
 
 Function ExeSearch (Const Name : UnicodeString; Const DirList : UnicodeString ='' ) : UnicodeString;
@@ -410,4 +410,4 @@ begin
     FileDateTime:=FileDatetoDateTime (Info.Time);
   FindClose(Info);
 end;
-{$ENDIF}
\ No newline at end of file
+{$ENDIF}