mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 12:59:12 +02:00
IDE: do not complete method declarations if there is code behind, bug #17668
git-svn-id: trunk@29223 -
This commit is contained in:
parent
0a22192168
commit
6ce70fb207
@ -600,8 +600,8 @@ begin
|
||||
icvCompleteProcDeclaration:
|
||||
// create complete procedure declaration
|
||||
if (AddChar='')
|
||||
and (not (IdentList.StartAtomBehind.Flag
|
||||
in [cafEdgedBracketOpen,cafRoundBracketOpen]))
|
||||
and (IdentList.StartAtomBehind.Flag in [cafEnd,cafWord,cafSemicolon])
|
||||
and (ilcfEndOfLine in IdentList.ContextFlags)
|
||||
and (IdentItem.Node<>nil) then begin
|
||||
ProcHeadFlags:=[phpWithStart,phpWithVarModifiers,phpWithParameterNames,
|
||||
phpWithDefaultValues,phpWithResultType,phpWithCallingSpecs,
|
||||
|
Loading…
Reference in New Issue
Block a user