paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-30 17:40:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Always show a message when a package is about to be installed, not only in

Browse Source 
verbose mode. This way it is always clear which package is being installed 
   in case of an error.

git-svn-id: trunk@20670 -
This commit is contained in:
joost 2012-03-30 14:41:09 +00:00
parent 265f54b26b
commit 8cb037fb59
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fpmkunit/src/fpmkunit.pp
View File

@ -5613,7 +5613,7 @@ begin
If (Apackage.State<>tsCompiled) then If (Apackage.State<>tsCompiled) then
MaybeCompile(APackage); MaybeCompile(APackage);
try try
Log(vlInfo,SInfoInstallingPackage,[APackage.Name]); Log(vlCommand,SInfoInstallingPackage,[APackage.Name]);
If (APackage.Directory<>'') then If (APackage.Directory<>'') then
EnterDir(APackage.Directory); EnterDir(APackage.Directory);
DoBeforeInstall(APackage); DoBeforeInstall(APackage);