IDE: fpc msg parser: check package file flag Use Unit

git-svn-id: trunk@45619 -
This commit is contained in:
mattias 2014-06-22 16:59:23 +00:00
parent ad2d4103c7
commit bf29568adb
2 changed files with 2 additions and 4 deletions

View File

@ -1905,8 +1905,7 @@ begin
then begin
// ppu file of an used package is missing
if (PkgFile<>nil) and (not PkgFile.InUses) then
s+=Format(lisFlagUseUnitInPackageOfUnitIsDisabled, [PkgName,
MissingUnitName])
s+=Format(lisEnableFlagUseUnitOfUnitInPackage, [MissingUnitName, PkgName])
else
s+=Format(lisCheckIfPackageCreatesPpuCheckNothingDeletesThisFil, [
PkgName, MissingUnitName]);

View File

@ -5754,8 +5754,7 @@ resourcestring
lisCheckIfPackageCreatesPpuCheckNothingDeletesThisFil = '. Check if package '
+'%s creates %s.ppu, check nothing deletes this file and check that no two'
+' packages have access to the unit source.';
lisFlagUseUnitInPackageOfUnitIsDisabled = 'Flag "Use Unit" in package %s of '
+'unit %s is disabled';
lisEnableFlagUseUnitOfUnitInPackage = '. Enable flag "Use Unit" of unit %s in package %s';
lisOfTheProjectInspector = ' of the Project Inspector';
lisOfPackage = ' of package %s';
lisCompileWithVdForMoreDetailsCheckForDuplicates = '%s -> Compile with -vd '