Small bugfixes

2005-11-13 10:40:59 +00:00
parent d09a8e1aac
commit c5761610b8
6 changed files with 21 additions and 13 deletions
--- a/editor/studio/UnitTextAnalyze.pas
+++ b/editor/studio/UnitTextAnalyze.pas
@ -279,6 +279,12 @@ begin
          if Pos('(', eTemp) <> 0 then
            eTemp := Copy(eTemp, 1, Pos('(', eTemp) - 1);
          eTemp := Trim(eTemp);
+          
+          if (Result.AutoComplete.IndexOf(eTemp) <> -1) then begin
+            eStartLine := -1;
+            eBracesOpen := 0;
+            continue;
+          end;

          if k < 5 then begin
            Result.AutoComplete.Add(eTemp);