anchor.diff:    STextW: UnicodeString;
     SLexerName: string;
     bWordChar, bIdentChar: boolean;
  +  bLexerHTML: boolean;
   begin
     Result:= true;
     if Ed.Carets.Count=0 then exit;
     Caret:= Ed.Carets[0];
   
  +  SLexerName:= EditorLexerNameAtPos(Ed, Point(Caret.PosX, Caret.PosY));
  +  bLexerHTML:= Pos('HTML', SLexerName)>0;
  +
     //autoshow by trigger chars
     if (Ed.OptAutocompleteTriggerChars<>'') and
       (Pos(AText[1], Ed.OptAutocompleteTriggerChars)>0) then
  
positive.code:     end;
    end;
  
    SLexerName:= EditorLexerNameAtPos(Ed, Point(Caret.PosX, Caret.PosY));
  
    //autoshow for all, when typed N chars
    if (Ed.OptAutocompleteAutoshowCharCount>0) then
    begin
  
negative.code:     ACharsTyped:= 0;
  
    //autoshow for HTML
    if UiOps.AutocompleteHtml and bLexerHTML then
    begin
      if Ed.Strings.LineCharAt(Caret.PosY, Caret.PosX-1)='<' then
        Ed.DoCommand(ACmdAutoComplete);
  