paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-19 12:29:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: identifier completion: do not add unit name if identifier is in same unit

Browse Source 
git-svn-id: trunk@41080 -
This commit is contained in:
mattias 2013-05-08 18:56:17 +00:00
parent 81fc1ab2f9
commit f08c4e6329
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

@ -1607,7 +1607,7 @@ begin
Params.ContextNode := CursorNode;
Params.Flags := [fdfSearchInAncestors..fdfIgnoreCurContextNode];
if FindIdentifierInContext(Params)
and (Params.NewNode <> ExprType.Context.Node.Parent) then
and (Params.NewCodeTool <> ExprType.Context.Tool) then
NewType := ExprType.Context.Tool.ExtractSourceName + '.' + NewType;
end;
finally