paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-20 04:06:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: fixed Unneeded extra space in event assignment completion

Browse Source 
git-svn-id: trunk@37594 -
This commit is contained in:
mattias 2012-06-08 17:00:13 +00:00
parent c6213c990e
commit c5a967874a
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/codecompletiontool.pas
View File

@ -1655,8 +1655,8 @@ var
AddrOperatorPos:=-1; AddrOperatorPos:=-1;
// check assignment operator := // check assignment operator :=
if not AtomIs(':=') then exit; if not AtomIs(':=') then exit;
AssignmentOperator:=CurPos.StartPos;
ReadPriorAtom; ReadPriorAtom;
AssignmentOperator:=CurPos.EndPos;
// check event name // check event name
if not AtomIsIdentifier then exit; if not AtomIsIdentifier then exit;
PropVarAtom:=CurPos; PropVarAtom:=CurPos;