mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-25 18:01:30 +02:00
codetools: class completion: add static method modifier for setter of class property
git-svn-id: trunk@37633 -
This commit is contained in:
parent
2f0a0b9f8e
commit
b6a92e67e4
@ -6741,7 +6741,7 @@ var
|
||||
end;
|
||||
// add new Insert Node
|
||||
if IsClassProp then
|
||||
AccessFunc:='class '+AccessFunc;
|
||||
AccessFunc:='class '+AccessFunc+' static;';
|
||||
if CompleteProperties then
|
||||
AddClassInsertion(CleanAccessFunc,AccessFunc,AccessParam,
|
||||
ncpPrivateProcs,PropNode,ProcBody);
|
||||
|
Loading…
Reference in New Issue
Block a user