pastojs: clean up

git-svn-id: trunk@46968 -
(cherry picked from commit 7945631ff1fcc7bb28de9c4eba81fe5c74058233)

packages/pastojs/src/fppas2js.pp

@@ -466,7 +466,6 @@ interface
 
 uses
   {$ifdef pas2js}
-  js,
   {$else}
   AVL_Tree,
   {$endif}

packages/pastojs/src/fppjssrcmap.pp

@@ -25,7 +25,7 @@ unit FPPJsSrcMap;
 interface
 
 uses
-  Classes, SysUtils, math,
+  SysUtils, math,
   jswriter, jstree, JSSrcMap;
 
 type

packages/pastojs/src/pas2jscompiler.pp

@@ -1182,6 +1182,7 @@ begin
   // maybe emit message ?
   FResourceHandler.StartUnit(PasModule.Name);
   FResourceHandler.HandleResource(aFileName,aOptions);
+  if Sender=nil then ;
 end;
 
 function TPas2jsCompilerFile.OnConverterIsElementUsed(Sender: TObject;

packages/pastojs/src/pas2jscompilercfg.pp

@@ -26,7 +26,7 @@ uses
   {$IFDEF NodeJS}
   node.fs,
   {$ENDIF}
-  Classes, SysUtils, Pas2jsFileUtils, Pas2JSFS, Pas2jsCompiler;
+  SysUtils, Pas2jsFileUtils, Pas2JSFS, Pas2jsCompiler;
 
 Type
   TPas2JSFileConfigSupport = Class(TPas2JSConfigSupport)

packages/pastojs/src/pas2jsfscompiler.pp

@@ -23,7 +23,7 @@ unit Pas2JSFSCompiler;
 interface
 
 uses
-  Classes, SysUtils,
+  SysUtils,
   PasUseAnalyzer,
   Pas2jsFileCache, Pas2jsCompiler,
   Pas2JSFS,

packages/pastojs/src/pas2jsresstrfile.pp

@@ -5,7 +5,7 @@ unit pas2jsresstrfile;
 interface
 
 uses
-  Classes, SysUtils, fpJSON;
+  SysUtils, fpJSON;
 
 Type