paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-15 20:19:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Formatting.

Browse Source 
git-svn-id: trunk@63947 -
This commit is contained in:
juha 2020-10-03 00:16:17 +00:00
parent 9a7c99dd00
commit f44d7e5d74
2 changed files with 70 additions and 81 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/project.pp
View File

@ -3917,7 +3917,6 @@ begin
CTDumpStack;
end;
{$ENDIF}
if fDestroying then exit;
if AValue then
IncreaseChangeStamp

10
ide/projectinspector.pas
View File

@ -1225,8 +1225,6 @@ var
ANodeData : TPENodeData;
begin
if not CanUpdate(pefNeedUpdateFiles) then exit;
//ItemsTreeView.BeginUpdate;
//try
FilesBranch:=FilterEdit.GetCleanBranch(FFilesNode);
FilesBranch.ClearNodeData;
FreeNodeData(penFile);
@ -1249,9 +1247,6 @@ begin
FilterEdit.InvalidateFilter; // Data is shown by FilterEdit.
UpdateProperties;
UpdateButtons;
//finally
// ItemsTreeView.EndUpdate;
//end;
end;
procedure TProjectInspectorForm.UpdateRequiredPackages;
@ -1262,8 +1257,6 @@ var
ANodeData : TPENodeData;
begin
if not CanUpdate(pefNeedUpdateRequiredPkgs) then exit;
//ItemsTreeView.BeginUpdate;
//try
RequiredBranch:=FilterEdit.GetCleanBranch(FDependenciesNode);
RequiredBranch.ClearNodeData;
FreeNodeData(penDependency);
@ -1319,9 +1312,6 @@ begin
FreeThenNil(FRemovedDependenciesNode);
end;
FilterEdit.InvalidateFilter;
//finally
// ItemsTreeView.EndUpdate;
//end;
UpdateProperties;
UpdateButtons;
end;