paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-13 20:59:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: spelling mistake.

Browse Source 
git-svn-id: trunk@27997 -
This commit is contained in:
juha 2010-10-30 23:31:16 +00:00
parent c10af39edc
commit 916a04d8ec
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ide/main.pp
View File

@ -4255,7 +4255,7 @@ var
var var
DlgResult, BuildResult: TModalResult; DlgResult, BuildResult: TModalResult;
i, RealCurInd: Integer; i, RealCurInd: Integer;
NeedRestart, FounfProfToBuild: Boolean; NeedRestart, FoundProfToBuild: Boolean;
s: String; s: String;
begin begin
DlgResult:=ShowConfigureBuildLazarusDlg(MiscellaneousOptions.BuildLazProfiles); DlgResult:=ShowConfigureBuildLazarusDlg(MiscellaneousOptions.BuildLazProfiles);
@ -4269,14 +4269,14 @@ begin
NeedRestart:=False; NeedRestart:=False;
RealCurInd:=BuildLazProfiles.CurrentIndex; RealCurInd:=BuildLazProfiles.CurrentIndex;
try try
FounfProfToBuild:=False; FoundProfToBuild:=False;
s:=sLineBreak + sLineBreak; s:=sLineBreak+sLineBreak;
for i:=0 to BuildLazProfiles.Count-1 do for i:=0 to BuildLazProfiles.Count-1 do
if BuildLazProfiles[i].BuildWithAll then begin if BuildLazProfiles[i].BuildWithAll then begin
s:=s+BuildLazProfiles[i].Name+sLineBreak; s:=s+BuildLazProfiles[i].Name+sLineBreak;
FounfProfToBuild:=True; FoundProfToBuild:=True;
end; end;
if not FounfProfToBuild then begin if not FoundProfToBuild then begin
ShowMessage(lisNoBuildProfilesSelected); ShowMessage(lisNoBuildProfilesSelected);
exit; exit;
end; end;