anchor.diff:    end;
   
     //completion for HTML, CSS, .acp - is available only with lexer
  -  //completion for file URI - is available for all files
  -  if IsHtml then
  +  if bNeedHtml then
       DoEditorCompletionHtml(Ed)
     else
  -  if IsCss then
  +  if bNeedCss then
       DoEditorCompletionCss(Ed)
     else
  -  if IsAcpFiles then
  -    DoEditorCompletionAcp(Ed, GetAppLexerAcpFilename(SLexer), IsCaseSens);
  +  if bNeedAcp then
  +    DoEditorCompletionAcp(Ed, GetAppLexerAcpFilename(SLexer), false{CaseSens});
   end;
   
   procedure TfmMain.mnuTreeFold2Click(Sender: TObject);
  
positive.code: var
    Frame: TEditorFrame;
    SLexer: string;
    IsCss, IsHtml, IsCaseSens, IsAcpFiles: boolean;
    Caret: TATCaretItem;
    bWithLexer: boolean;
  begin
  
negative.code: 
      //allow autocompletion with multi-carets only in HTML
      if Ed.Carets.Count>1 then
        if not bNeedHtml then
        begin
          MsgStatus(msgCannotAutocompleteMultiCarets);
          exit;
  