mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-11 11:35:57 +02:00
codetools: auto indenter: start first class section automatically
git-svn-id: trunk@26593 -
This commit is contained in:
parent
f94941a0de
commit
ad682260a7
@ -834,8 +834,11 @@ begin
|
||||
end;
|
||||
'L': // CL
|
||||
if CompareIdentifiers('CLASS',r)=0 then begin
|
||||
if Stack.TopType=bbtDefinition then
|
||||
if Stack.TopType=bbtDefinition then begin
|
||||
BeginBlock(bbtClass);
|
||||
// the first section is created automatically
|
||||
BeginBlock(bbtClassSection);
|
||||
end;
|
||||
end;
|
||||
'O': // CO
|
||||
if CompareIdentifiers('CONST',r)=0 then
|
||||
|
Loading…
Reference in New Issue
Block a user