From bf29568adbda91c7f7e36008275a4996de609115 Mon Sep 17 00:00:00 2001 From: mattias Date: Sun, 22 Jun 2014 16:59:23 +0000 Subject: [PATCH] IDE: fpc msg parser: check package file flag Use Unit git-svn-id: trunk@45619 - --- ide/etfpcmsgparser.pas | 3 +-- ide/lazarusidestrconsts.pas | 3 +-- 2 files changed, 2 insertions(+), 4 deletions(-) diff --git a/ide/etfpcmsgparser.pas b/ide/etfpcmsgparser.pas index d5422b9cf0..4d9c605fa6 100644 --- a/ide/etfpcmsgparser.pas +++ b/ide/etfpcmsgparser.pas @@ -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]); diff --git a/ide/lazarusidestrconsts.pas b/ide/lazarusidestrconsts.pas index b33a512372..53577caf8f 100644 --- a/ide/lazarusidestrconsts.pas +++ b/ide/lazarusidestrconsts.pas @@ -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 '