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

project groups: save as: rebase TreeView nodes

Browse Source 
git-svn-id: trunk@50377 -
This commit is contained in:
mattias 2015-11-17 23:28:08 +00:00
parent 0351081414
commit b4330dfd9e
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/projectgroups/projectgroupeditor.pas
View File

@ -293,6 +293,7 @@ end;
procedure TProjectGroupEditorForm.SetProjectGroup(AValue: TProjectGroup); procedure TProjectGroupEditorForm.SetProjectGroup(AValue: TProjectGroup);
begin begin
debugln(['TProjectGroupEditorForm.SetProjectGroup START ',FProjectGroup=AValue]);
if FProjectGroup=AValue then Exit; if FProjectGroup=AValue then Exit;
if ProjectGroup<>nil then if ProjectGroup<>nil then
begin begin