* Added more logging on why packages are installed

git-svn-id: trunk@35700 -

packages/fppkg/src/pkgcommands.pp

@@ -422,11 +422,17 @@ begin
       InstallRepo := PackageManager.GetInstallRepository(AvailPackage);
       case InstallRepo.DefaultPackagesStructure.IsInstallationNeeded(AvailPackage) of
         fpinInstallationNeeded:
-          ExecuteAction(PackageName,'fpmakeinstall');
+          begin
+            log(llDebug,SDbgPackageInstallRequired,[AvailPackage.Repository.RepositoryName+'-'+PackageName, InstallRepo.RepositoryName]);
+            ExecuteAction(PackageName,'fpmakeinstall');
+          end;
         fpinInstallationImpossible:
           Error(SErrInstallationImpossible,[PackageName, InstallRepo.RepositoryName]);
         else if ForceInstall then
-          ExecuteAction(PackageName,'fpmakeinstall');
+          begin
+            log(llDebug,SDbgForcePackageInstall,[P.Name]);
+            ExecuteAction(PackageName,'fpmakeinstall');
+          end;
       end;
 
       if (PackageName=CmdLinePackageName) or (PackageName=CurrentDirPackageName) or

packages/fppkg/src/pkgmessages.pp

@@ -147,6 +147,8 @@ Resourcestring
   SDbgPackageMultipleLocations = 'Multiple installations found for package %s, using installation "%s"';
   SDbgPackageDependencyOtherTarget  = 'Dependency on package %s is not for %s';
   SDbgObsoleteDependency     = 'Package %s depends on package %s which is not installed anymore';
+  SDbgForcePackageInstall    = 'Installation of package "%s" forced';
+  SDbgPackageInstallRequired = 'Installation of package "%s" required for repository "%s"';
 
   SWarnBrokenAfterReinstall  = 'Package %s is still broken, even after re-installation.';