anchor.diff:    if UiOps.AutocompleteHtml and bLexerHTML then
     begin
       if Ed.Strings.LineCharAt(Caret.PosY, Caret.PosX-1)='<' then
  -      Ed.DoCommand(ACmdAutoComplete);
  +      CallCompletion;
       exit;
     end;
   
  
positive.code: 
  function EditorAutoCompletionAfterTypingChar(Ed: TATSynEdit;
    const AText: string; var ACharsTyped: integer; ACmdAutoComplete: integer): boolean;
  var
    Caret: TATCaretItem;
    STextW: UnicodeString;
  
negative.code:     if EditorCaretInsideCommentOrString(Ed, Caret.PosX, Caret.PosY) then exit;
  
      ACharsTyped:= 0;
      CallCompletion;
      exit;
    end;
  
  