paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2026-01-04 10:00:34 +01:00
Code Issues Packages Projects Releases Wiki Activity

IdeIntf: Fix a variable used in TBackupComponentList.IsEqual. FLookupRoot -> ALookupRoot.

Browse Source 
git-svn-id: trunk@63778 -
This commit is contained in:
juha 2020-08-18 17:35:15 +00:00
parent 9ff4b0dc00
commit 79aa858900
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/ideintf/propeditutils.pp
View File

@ -348,7 +348,7 @@ begin
Result := False;
if ALookupRoot <> LookupRoot then Exit;
if not FSelection.IsEqual(ASelection) then Exit;
if (ALookupRoot <> nil) and (FLookupRoot is TComponent) then
if ALookupRoot is TComponent then
begin
if ComponentCount <> TComponent(ALookupRoot).ComponentCount then
Exit;