paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 23:18:01 +02:00
Code Issues Packages Projects Releases Wiki Activity

Merge branch 'CodeTools/Examples/AddClass' into 'main'

Browse Source 
CodeTools: Fixing compilation of the addclass.lpi example (continued 2f643bd4)

See merge request freepascal.org/lazarus/lazarus!318
This commit is contained in:
Mattias Gaertner 2024-08-18 09:23:38 +00:00
commit 98b800100f
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/codetools/examples/addclass.lpr
View File

@ -57,7 +57,7 @@ begin
end;
SourceChangeCache:=CodeToolBoss.SourceChangeCache;
// find a nice insert position (behind the uses section)
UsesSection:=Tool.FindMainUsesSection(false);
UsesSection:=Tool.FindMainUsesNode(false);
InsertPos:=UsesSection.EndPos;
// use the same indentation as the start of the uses section
Indent:=GetLineIndent(Tool.Src,UsesSection.StartPos);