anchor.diff:      procedure Unprepare;
       //
       property Capabilities: TEditorCapabilities read FCapabilities;
  -    property Groups: TFileGroups read GetGroups;
  +    property Groups: TFileGroups read FGroups;
       property Debug: TEditorDebugger read FDebug write SetDebug;
     published
       property Command: string read FCommand write FCommand; //like php.exe or gdc.exe or fpc.exe
  
positive.code:     FCapabilities: TEditorCapabilities;
      procedure AddGroup(vName, vCategory: string);
      function CreateDebugger: TEditorDebugger; virtual;
      function GetGroups: TFileGroups; virtual;
      procedure Init; virtual; abstract;
      procedure DoRun(Info: TmneRunInfo); virtual;
    public
  
negative.code:   FDescription := 'Default project type';
  end;
  
  function TDefaultTendency.GetDefaultGroup: TFileGroup;
  begin
    Result := Groups.Find('txt');
  