paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 12:59:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
n7800 2024-08-13 20:04:21 +05:00
parent d4d817e7af
commit 48b22a8acf
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);