paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-27 10:14:03 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: fixed identifier completion not adding semicolon if next char is semicolon, bug

Browse Source 
git-svn-id: trunk@16512 -
This commit is contained in:
mattias 2008-09-09 21:26:49 +00:00
parent 45553cc34d
commit 8aeaa048e1
1 changed files with 1 additions and 1 deletions

2
ide/sourceeditprocs.pas
View File

@ -419,7 +419,7 @@ begin
ValueType:=icvIdentifier;
Index:=aCompletion.Position;
IdentList:=CodeToolBoss.IdentifierList;
CanAddSemicolon:=CodeToolsOpts.IdentComplAddSemicolon;
CanAddSemicolon:=CodeToolsOpts.IdentComplAddSemicolon and (AddChar<>';');
IdentItem:=IdentList.FilteredItems[Index];
if IdentItem=nil then exit;