pastojs: clean up

git-svn-id: trunk@41313 -

packages/pastojs/src/pas2jsfileutils.pp

@@ -40,8 +40,8 @@ function FileIsInPath(const Filename, Path: string): boolean;
 function ChompPathDelim(const Path: string): string;
 function ExpandFileNamePJ(const FileName: string; {const} BaseDir: string = ''): string;
 function ExpandDirectory(const aDirectory: string): string;
-function IsUNCPath(const {%H-}Path: String): Boolean;
-function ExtractUNCVolume(const {%H-}Path: String): String;
+function IsUNCPath(const Path: String): Boolean;
+function ExtractUNCVolume(const Path: String): String;
 function ExtractFileRoot(FileName: String): String;
 function TryCreateRelativePath(
   const Dest: String; // Filename

packages/pastojs/src/pas2jsfileutilsnodejs.inc

@@ -145,11 +145,13 @@ end;
 function IsUNCPath(const Path: String): Boolean;
 begin
   Result := false;
+  if Path='' then ;
 end;
 
 function ExtractUNCVolume(const Path: String): String;
 begin
   Result := '';
+  if Path='' then ;
 end;
 
 function FileIsWritable(const AFilename: string): boolean;

packages/pastojs/src/pas2jsfileutilsunix.inc

@@ -146,11 +146,13 @@ end;
 function IsUNCPath(const Path: String): Boolean;
 begin
   Result := false;
+  if Path='' then ;
 end;
 
 function ExtractUNCVolume(const Path: String): String;
 begin
   Result := '';
+  if Path='' then ;
 end;
 
 function FileIsWritable(const AFilename: string): boolean;