From 97e18a00f6de7848c31a6eca8f826ab82cc6c70d Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 8 Oct 2007 10:24:02 +0000
Subject: [PATCH] IDE: identifier completion: adding := : checks if there is
 already a :=

git-svn-id: trunk@12376 -
---
 ide/sourceeditprocs.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ide/sourceeditprocs.pas b/ide/sourceeditprocs.pas
index 534977240d..2e54706cf3 100644
--- a/ide/sourceeditprocs.pas
+++ b/ide/sourceeditprocs.pas
@@ -508,7 +508,8 @@ begin
   end;}
   
   if (ilcfStartIsLValue in  IdentList.ContextFlags)
-  and (not IdentItem.HasChilds) then begin
+  and (not IdentItem.HasChilds)
+  and (not IdentList.StartUpAtomBehindIs(':=')) then begin
     if (atIdentifier in CodeToolsOpts.DoInsertSpaceAfter)
     or (atSymbol in CodeToolsOpts.DoInsertSpaceInFront) then
       Result:=Result+' ';