anchor.diff:  begin
     if FPath = AValue then Exit;
     FPath := AValue;
  +end;
  +
  +procedure TModConfig.SetVersion(AValue: string);
  +begin
  +  if FVersion=AValue then Exit;
  +  FVersion:=AValue;
   end;
   
   
  
positive.code:       mod_config.Depends.Add(AParentModID);
      end;
  
      FMods.Add(mod_config);
      FModMap.Add(mod_config.ID,mod_config);
      FConfigMap.Add(mod_config.ID,mod_config);
    finally
      stm.Free;
      destreamer.Free;
  
negative.code:     FID: TModId;
      FName: string;
      FPath: String;
      FVersion: string;
  
      function GetConflicts: TStrings;
      function GetDepends: TStrings;
  