diff --git a/ide/main.pp b/ide/main.pp
index ee8237aaae..d63150bef6 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -10993,8 +10993,8 @@ begin
     NewProjectFilename:=DestDir+ExtractFilename(CurProject.ProjectInfoFile);
     DeleteFileUTF8(NewProjectFilename);
     Result:=CurProject.WriteProject(CurProject.PublishOptions.WriteFlags
-                                   +[pwfSkipDebuggerSettings,pwfSkipJumpPoints],
-                                   NewProjectFilename);
+           +[pwfSkipDebuggerSettings,pwfSkipJumpPoints,pwfDoNotSaveSessionInfo],
+           NewProjectFilename);
     if Result<>mrOk then begin
       debugln('TMainIDE.DoPublishModule CurProject.WriteProject failed');
       exit;