From 231b86dcdf02f5301439e7707c1970daad282685 Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Tue, 4 Dec 2018 21:40:32 +0000
Subject: [PATCH] * Reset also resets main program src
git-svn-id: trunk@40470 -
---
packages/pastojs/src/pas2jscompiler.pp | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/packages/pastojs/src/pas2jscompiler.pp b/packages/pastojs/src/pas2jscompiler.pp
index 4094750225..7e66cbc4cb 100644
--- a/packages/pastojs/src/pas2jscompiler.pp
+++ b/packages/pastojs/src/pas2jscompiler.pp
@@ -2118,7 +2118,7 @@ begin
begin
// create writer for this file
CreateFileWriter(DestFilename);
- if aFile.IsMainFile and not AllJSIntoMainJS then
+ if aFile.IsMainFile and Not AllJSIntoMainJS then
InsertCustomJSFiles(aFileWriter);
end;
@@ -3865,7 +3865,7 @@ begin
FPostProcessorSupport.Clear;
FCompilerExe:='';
FSrcMapBaseDir:='';
-
+ FMainSrcFile:='';
FOptions:=DefaultP2jsCompilerOptions;
FRTLVersionCheck:=DefaultP2jsRTLVersionCheck;
FMode:=p2jmObjFPC;