Browse Source

* Add a debug message to determine if a package is a source- or installed-package

git-svn-id: trunk@35816 -
joost 8 years ago
parent
commit
cd13255d56
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fpmkunit/src/fpmkunit.pp

+ 1 - 1
packages/fpmkunit/src/fpmkunit.pp

@@ -2792,7 +2792,7 @@ begin
   else
   else
     ASubDir:=APackage.Directory;
     ASubDir:=APackage.Directory;
 
 
-  IsPackageSourceLocation:=FileExists(IncludeTrailingPathDelimiter(IncludeTrailingPathDelimiter(ABasePath)+ASubDir)+FPMakePPFile);
+  IsPackageSourceLocation:=ABuildEngine.SysFileExists(IncludeTrailingPathDelimiter(IncludeTrailingPathDelimiter(ABasePath)+ASubDir)+FPMakePPFile);
   if IsPackageSourceLocation then
   if IsPackageSourceLocation then
     begin
     begin
       PackageBaseDir:=IncludeTrailingPathDelimiter(IncludeTrailingPathDelimiter(ABasePath)+ASubDir);
       PackageBaseDir:=IncludeTrailingPathDelimiter(IncludeTrailingPathDelimiter(ABasePath)+ASubDir);