From 79b8ee4d4f4cdcdde47bec108d696dab9cd58905 Mon Sep 17 00:00:00 2001
From: peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Thu, 23 Oct 2008 20:05:59 +0000
Subject:   * use stdout only

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@11957 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 packages/fpmkunit/src/fpmkunit.pp | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

(limited to 'packages/fpmkunit')

diff --git a/packages/fpmkunit/src/fpmkunit.pp b/packages/fpmkunit/src/fpmkunit.pp
index 2c77c85cb8..7c833dc1d6 100644
--- a/packages/fpmkunit/src/fpmkunit.pp
+++ b/packages/fpmkunit/src/fpmkunit.pp
@@ -2625,12 +2625,7 @@ end;
 procedure TCustomInstaller.Log(Level: TVerboseLevel; const Msg: String);
 begin
   If Level in FLogLevels then
-    begin
-      if Level in [vlError,vlWarning] then
-        Writeln(StdErr,Msg)
-      else
-        Writeln(StdOut,Msg);
-    end;
+    Writeln(StdOut,Msg);
 end;
 
 
-- 
cgit v1.2.1