anchor.diff:  {$REGION project ---------------------------------------------------------------}
   procedure TCEMainForm.projChange(sender: TObject);
   var
  -  widg: TCEWidget;
  -begin
  -  for widg in WidgetList do
  -    widg.projChange(fProject);
  +  i: NativeInt;
  +begin
  +  for i := 0 to WidgetList.Count-1 do
  +    WidgetList.widget[i].projChange(fProject);
   end;
   
   procedure TCEMainForm.saveProjSource(const aEditor: TCESynMemo);
  
positive.code:   fFileMru.Assign(CEMainForm.fFileMru);
    fProjMru.Assign(CEMainForm.fProjMru);
    //
    for widg in CEMainForm.WidgetList do
      widg.beforeSave(nil);
  end;
  
  procedure TCEOptions.saveToFile(const aFilename: string);
  
negative.code:   lst := TStringList.Create;
    try
      listFiles(lst, pth, false);
      for i := 0 to lst.Count-1 do
      begin
        fname := lst.Strings[i];
        if extractFileExt(fname) <> '.' + SharedSuffix then
          continue;
        hdl := LoadLibrary(fname);
  