anchor.diff:  end;
   
   
  +procedure TfmlexerLib.DeletePackagesIniSection(const ALexerName: string);
  +var
  +  fn: string;
  +  Ini: TIniFile;
  +begin
  +  fn:= AppDir_Settings+DirectorySeparator+'packages.ini';
  +  if FileExists(fn) then
  +  begin
  +    Ini:= TIniFile.Create(fn);
  +    try
  +      Ini.EraseSection('lexer.'+ALexerName+'.zip');
  +    finally
  +      FreeAndNil(Ini);
  +    end;
  +  end;
  +end;
  +
   procedure TfmLexerLib.btnDeleteClick(Sender: TObject);
   var
     an: TecSyntAnalyzer;
  
positive.code:   List.SetFocus;
  
    NIndex:= List.ItemIndex;
    if NIndex<0 then exit;
    an:= List.Items.Objects[NIndex] as TecSyntAnalyzer;
  
    if MsgBox(
  
negative.code:     DeleteFile(AppFile_Lexer(an.LexerName));
      DeleteFile(AppFile_LexerMap(an.LexerName));
      DeleteFile(AppFile_LexerAcp(an.LexerName));
      DeletePackagesIniSection(an.LexerName);
  
      AppManager.DeleteLexer(an);
      AppManager.Modified:= true;
  