Jelajahi Sumber

* Reset also resets main program src

git-svn-id: trunk@40470 -
michael 6 tahun lalu
induk
melakukan
231b86dcdf
1 mengubah file dengan 2 tambahan dan 2 penghapusan
  1. 2 2
      packages/pastojs/src/pas2jscompiler.pp

+ 2 - 2
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;