paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-16 18:49:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Remove writeln statements

Browse Source 
git-svn-id: trunk@56788 -
This commit is contained in:
michael 2017-12-18 22:06:06 +00:00
parent 0737a593d7
commit 175e231938
2 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
components/pas2js/pjscontroller.pp
View File

@ -87,15 +87,15 @@ Var
begin begin
Abort:=LazarusIDE.ActiveProject.CustomData[PJSProjectWebBrowser]<>'1'; Abort:=LazarusIDE.ActiveProject.CustomData[PJSProjectWebBrowser]<>'1';
Writeln('LazarusIDE.ActiveProject.CustomData[PJSProjectWebBrowser]: ',LazarusIDE.ActiveProject.CustomData[PJSProjectWebBrowser]); // Writeln('LazarusIDE.ActiveProject.CustomData[PJSProjectWebBrowser]: ',LazarusIDE.ActiveProject.CustomData[PJSProjectWebBrowser]);
if Abort then if Abort then
exit; exit;
Result:=LazarusIDE.ActiveProject.CustomData[PJSProjectURL]; Result:=LazarusIDE.ActiveProject.CustomData[PJSProjectURL];
Writeln('LazarusIDE.ActiveProject.CustomData[PJSProjectURL]: ',LazarusIDE.ActiveProject.CustomData[PJSProjectURL]); // Writeln('LazarusIDE.ActiveProject.CustomData[PJSProjectURL]: ',LazarusIDE.ActiveProject.CustomData[PJSProjectURL]);
if (Result='') then if (Result='') then
begin begin
FN:=LazarusIDE.ActiveProject.CustomData[PJSProjectHTMLFile]; FN:=LazarusIDE.ActiveProject.CustomData[PJSProjectHTMLFile];
Writeln('LazarusIDE.ActiveProject.CustomData[PJSProjectHTMLFile]: ',LazarusIDE.ActiveProject.CustomData[PJSProjectHTMLFile]); // Writeln('LazarusIDE.ActiveProject.CustomData[PJSProjectHTMLFile]: ',LazarusIDE.ActiveProject.CustomData[PJSProjectHTMLFile]);
if (FN='') then if (FN='') then
FN:=ChangeFileExt(ExtractFileName(LazarusIDE.ActiveProject.ProjectInfoFile),'.html'); FN:=ChangeFileExt(ExtractFileName(LazarusIDE.ActiveProject.ProjectInfoFile),'.html');
Result:=LazarusIDE.ActiveProject.CustomData[PJSProjectPort]; Result:=LazarusIDE.ActiveProject.CustomData[PJSProjectPort];
@ -109,7 +109,7 @@ begin
{$ENDIF} {$ENDIF}
end; end;
Abort:=(Result=''); Abort:=(Result='');
Writeln('GetProjectURL : ',Result); // Writeln('GetProjectURL : ',Result);
end; end;
constructor TPJSController.Create; constructor TPJSController.Create;

1
components/pas2js/pjsdsgnregister.pas
View File

@ -257,7 +257,6 @@ begin
AProject.AddPackageDependency('pas2js_rtl'); AProject.AddPackageDependency('pas2js_rtl');
if naoUseNodeJSApp in Options then if naoUseNodeJSApp in Options then
AProject.AddPackageDependency('fcl_base_pas2js'); AProject.AddPackageDependency('fcl_base_pas2js');
end; end;
function TProjectPas2JSNodeJSApp.CreateStartFiles(AProject: TLazProject function TProjectPas2JSNodeJSApp.CreateStartFiles(AProject: TLazProject