anchor.diff:    TDefaultTendency = class(TEditorTendency)
     protected
       procedure Init; override;
  -    function GetGroups: TFileGroups; override;
     public
       function GetDefaultGroup: TFileGroup; override;
     end;
  
positive.code:   FDescription := 'Default project type';
  end;
  
  function TDefaultTendency.GetGroups: TFileGroups;
  begin
    Result := Engine.Groups;
  end;
  
  function TDefaultTendency.GetDefaultGroup: TFileGroup;
  begin
    Result := Groups.Find('txt');
  
negative.code: end;
  
  { TEditorTendency }
  
  procedure TEditorTendency.DoRun(Info: TmneRunInfo);
  begin
  