mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-12 17:39:18 +02:00
IDE: spelling mistake.
git-svn-id: trunk@27997 -
This commit is contained in:
parent
c10af39edc
commit
916a04d8ec
10
ide/main.pp
10
ide/main.pp
@ -4255,7 +4255,7 @@ var
|
||||
var
|
||||
DlgResult, BuildResult: TModalResult;
|
||||
i, RealCurInd: Integer;
|
||||
NeedRestart, FounfProfToBuild: Boolean;
|
||||
NeedRestart, FoundProfToBuild: Boolean;
|
||||
s: String;
|
||||
begin
|
||||
DlgResult:=ShowConfigureBuildLazarusDlg(MiscellaneousOptions.BuildLazProfiles);
|
||||
@ -4269,14 +4269,14 @@ begin
|
||||
NeedRestart:=False;
|
||||
RealCurInd:=BuildLazProfiles.CurrentIndex;
|
||||
try
|
||||
FounfProfToBuild:=False;
|
||||
s:=sLineBreak + sLineBreak;
|
||||
FoundProfToBuild:=False;
|
||||
s:=sLineBreak+sLineBreak;
|
||||
for i:=0 to BuildLazProfiles.Count-1 do
|
||||
if BuildLazProfiles[i].BuildWithAll then begin
|
||||
s:=s+BuildLazProfiles[i].Name+sLineBreak;
|
||||
FounfProfToBuild:=True;
|
||||
FoundProfToBuild:=True;
|
||||
end;
|
||||
if not FounfProfToBuild then begin
|
||||
if not FoundProfToBuild then begin
|
||||
ShowMessage(lisNoBuildProfilesSelected);
|
||||
exit;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user