mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-04 20:20:23 +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;
|
end;
|
||||||
// add new Insert Node
|
// add new Insert Node
|
||||||
if IsClassProp then
|
if IsClassProp then
|
||||||
AccessFunc:='class '+AccessFunc;
|
AccessFunc:='class '+AccessFunc+' static;';
|
||||||
if CompleteProperties then
|
if CompleteProperties then
|
||||||
AddClassInsertion(CleanAccessFunc,AccessFunc,AccessParam,
|
AddClassInsertion(CleanAccessFunc,AccessFunc,AccessParam,
|
||||||
ncpPrivateProcs,PropNode,ProcBody);
|
ncpPrivateProcs,PropNode,ProcBody);
|
||||||
|
Loading…
Reference in New Issue
Block a user