anchor.diff:      if SFileName='' then
       begin
         NameInitial:= '';
  -      EventRes:= DoPyEvent(Ed, cEventOnSaveNaming, Params);
  +      EventRes:= DoPyEvent(Ed, cEventOnSaveNaming, []);
         if EventRes.Val=evrString then
           NameInitial:= EventRes.Str;
         if NameInitial='' then
  
positive.code:   NameCounter: integer;
    SFileName, NameTemp, NameInitial: string;
    EventRes: TAppPyEventResult;
    Params: TAppVariantArray;
  begin
    Result:= true;
    if FrameKind<>efkEditor then exit(true); //disable saving, but close
  
    SetLength(Params, 0);
    EventRes:= DoPyEvent(Ed, cEventOnSaveBefore, Params);
    if EventRes.Val=evrFalse then exit(true); //disable saving, but close
  
    DoHideNotificationPanel(EditorObjToIndex(Ed));
  
negative.code:       UpdateCaptionFromFilename;
  
      DoSaveUndo(Ed, SFileName);
      DoPyEvent(Ed, cEventOnSaveAfter, []);
      if Assigned(FOnSaveFile) then
        FOnSaveFile(Ed, SFileName);
    end;
  