paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-29 18:42:50 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix Compile

Browse Source 
git-svn-id: trunk@64670 -
This commit is contained in:
martin 2021-02-26 20:39:27 +00:00
parent 441ac1e643
commit 249e2b5f08
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazutils/masks.pas
View File

@ -1094,7 +1094,7 @@ end;
constructor TMaskList.CreateSysNative(const AValue: String; ASeparator: Char; CaseSensitive: Boolean); constructor TMaskList.CreateSysNative(const AValue: String; ASeparator: Char; CaseSensitive: Boolean);
begin begin
{$IFDEF Windows} {$IFDEF Windows}
CreateWindows(AValue, ASeparator, CaseSensitive)); CreateWindows(AValue, ASeparator, CaseSensitive);
{$ELSE} {$ELSE}
Create(AValue, ASeparator, CaseSensitive); Create(AValue, ASeparator, CaseSensitive);
{$ENDIF} {$ENDIF}