paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-07 06:38:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

PoChecker: do not increment WarningCount CheckStatistics.

Browse Source 
git-svn-id: trunk@44250 -
This commit is contained in:
bart 2014-02-26 17:52:59 +00:00
parent 7bbea27144
commit 206cae270e
2 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/pochecker/pocheckermain.pp
View File

@ -308,7 +308,7 @@ begin
PoFamily.RunTests(Options, ErrorCount, WarningCount, SL);
debugln('RunSelectedTests: ',Format(sTotalErrors,[ErrorCount]));
debugln(' ',Format(sTotalWarnings,[WarningCount]));
if (ErrorCount > 0) or (WarningCount > 0) then
if (ErrorCount > 0) or (WarningCount > 0) or (ptoCheckStatistics in Options) then
begin
SL.Add(Format(sTotalErrors,[ErrorCount]));
SL.Add(Format(sTotalWarnings,[WarningCount]));

1
components/pochecker/pofamilies.pp
View File

@ -601,7 +601,6 @@ begin
NrTotal := NrTranslated + NrUntranslated + NrFuzzy;
if (NrTotal > 0) then
begin
WarningCount := 1; //else it will not show up...
ErrorLog.Add(Divider);
ErrorLog.Add(sTranslationStatistics);
ErrorLog.Add(ShortChildName);