From c19d9256e99689d413c2e5b7eb61727d6f768d5f Mon Sep 17 00:00:00 2001 From: juha Date: Sun, 8 Jan 2012 23:13:46 +0000 Subject: [PATCH] PoChecker: put debuglns to a correct place. git-svn-id: trunk@34672 - --- components/pochecker/Proj/pocheckermain.pp | 2 +- components/pochecker/pocheckermain.pp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/components/pochecker/Proj/pocheckermain.pp b/components/pochecker/Proj/pocheckermain.pp index 07a79a3c1e..5473c4c97b 100644 --- a/components/pochecker/Proj/pocheckermain.pp +++ b/components/pochecker/Proj/pocheckermain.pp @@ -273,9 +273,9 @@ begin and (PoFamily.ChildName <> FChoosenChildName) then PoFamily.ChildName := FChoosenChildName; PoFamily.RunTests(Options, ErrorCount, WarningCount, SL); - if (ErrorCount > 0) or (WarningCount > 0) then debugln('RunSelectedTests: ',Format(sTotalErrors,[ErrorCount])); debugln(' ',Format(sTotalWarnings,[WarningCount])); + if (ErrorCount > 0) or (WarningCount > 0) then begin SL.Add(Format(sTotalErrors,[ErrorCount])); SL.Add(Format(sTotalWarnings,[WarningCount])); diff --git a/components/pochecker/pocheckermain.pp b/components/pochecker/pocheckermain.pp index 8b993cdc77..46e0c2f251 100644 --- a/components/pochecker/pocheckermain.pp +++ b/components/pochecker/pocheckermain.pp @@ -283,9 +283,9 @@ begin and (PoFamily.ChildName <> FChoosenChildName) then PoFamily.ChildName := FChoosenChildName; PoFamily.RunTests(Options, ErrorCount, WarningCount, SL); - if (ErrorCount > 0) or (WarningCount > 0) then debugln('RunSelectedTests: ',Format(sTotalErrors,[ErrorCount])); debugln(' ',Format(sTotalWarnings,[WarningCount])); + if (ErrorCount > 0) or (WarningCount > 0) then begin SL.Add(Format(sTotalErrors,[ErrorCount])); SL.Add(Format(sTotalWarnings,[WarningCount]));