From 288d77f4f614f256a86838fcbbba23cf29e1f93d Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 23 Apr 2022 12:13:11 +0200 Subject: [PATCH] pas2js: fixed runnable flags --- components/pas2js/pjsdsgnregister.pas | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/components/pas2js/pjsdsgnregister.pas b/components/pas2js/pjsdsgnregister.pas index c526a8c739..76d520b30d 100644 --- a/components/pas2js/pjsdsgnregister.pas +++ b/components/pas2js/pjsdsgnregister.pas @@ -1044,7 +1044,6 @@ begin Result:=false; AProject.CustomData.Values[PJSProject]:='1'; - AProject.Flags:=AProject.Flags-[pfRunnable]; MainFile:=AProject.CreateProjectFile(PreloadLPR); MainFile.IsPartOfProject:=true; @@ -1120,7 +1119,6 @@ begin AProject.ProjectInfoFile:=RenderLPI; AProject.CustomData.Values[PJSProject]:='1'; - AProject.Flags:=AProject.Flags-[pfRunnable]; MainFile:=AProject.CreateProjectFile(RenderLPR); MainFile.IsPartOfProject:=true; @@ -1182,7 +1180,6 @@ begin AProject.ProjectInfoFile:=ChangeFileExt(MainSrcFileName,'.lpi'); AProject.CustomData.Values[PJSProject]:='1'; - AProject.Flags:=AProject.Flags+[pfRunnable]; MainFile:=AProject.CreateProjectFile(MainSrcFileName); MainFile.IsPartOfProject:=true; @@ -1313,7 +1310,7 @@ var CompOpts: TLazCompilerOptions; RunMode: TAbstractRunParamsOptionsMode; begin - AProject.Flags:=DefaultProjectNoApplicationFlags-[pfRunnable]; + AProject.Flags:=DefaultProjectNoApplicationFlags; AProject.CustomData.Values[PJSProject]:='1'; // start with the preload project @@ -1868,7 +1865,7 @@ end; procedure TProjectPas2JSWebApp.Clear; begin // Reset options - Flags:=DefaultProjectNoApplicationFlags-[pfRunnable]; + Flags:=DefaultProjectNoApplicationFlags; FMainSrcName:='Project1'; FOptions:=[baoCreateHtml,baoMaintainHTML,baoStartServer]; ProjectPort:=0; @@ -2284,7 +2281,6 @@ begin end; end; - constructor TProjectPas2JSModuleApp.Create; begin inherited Create;