Browse Source

* typo fix in block unstressed on Unix.

git-svn-id: branches/unicode@24721 -
marco 12 years ago
parent
commit
7728f5ef6c
1 changed files with 2 additions and 2 deletions
  1. 2 2
      rtl/objpas/sysutils/filutil.inc

+ 2 - 2
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}
+{$ENDIF}