anchor.diff:  class procedure TKeymapHelperMain.AddPluginsWithHotkeyBackup(AKeymap: TATKeymap; ABackup: TAppHotkeyBackup; ACategory: TAppCommandCategory);
   var
     CmdItem: TAppCommandInfo;
  -  StrCommand: string;
  +  SCommandText: string;
     i: integer;
   begin
     for i:= 0 to AppCommandList.Count-1 do
  
positive.code: class procedure TKeymapHelperMain.DeleteCategoryWithHotkeyBackup(AKeymap: TATKeymap; ABackup: TAppHotkeyBackup; ACategory: TAppCommandCategory);
  var
    MapItem: TATKeymapItem;
    CmdItem: TAppCommandInfo;
    Cmd, i: integer;
    NPluginIndex: integer;
  begin
    for i:= AKeymap.Count-1 downto 0 do
    begin
  
negative.code:     if CmdItem.ItemFromApi xor (ACategory=categ_PluginSub) then Continue;
      if CmdItem.ItemModule='' then Break;
      if SEndsWith(CmdItem.ItemCaption, '-') then Continue;
      SCommandText:= CmdItem.CommaStr;
  
      AKeymap.Add(
        cmdFirstPluginCommand+i,
        'plugin: '+AppNicePluginCaption(CmdItem.ItemCaption),
        [], [],
        SCommandText);
  
      ABackup.Get(AKeymap[AKeymap.Count-1], SCommandText);
    end;
  end;
  
  