Przeglądaj źródła

* typo fix in block unstressed on Unix.

git-svn-id: branches/unicode@24721 -
marco 12 lat temu
rodzic
commit
7728f5ef6c
1 zmienionych plików z 2 dodań i 2 usunięć
  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}