diff options
| author | peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2008-10-23 20:05:59 +0000 |
|---|---|---|
| committer | peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2008-10-23 20:05:59 +0000 |
| commit | 79b8ee4d4f4cdcdde47bec108d696dab9cd58905 (patch) | |
| tree | 47a7720abb34f2195ea24793c0846290dba7137c /packages/fpmkunit | |
| parent | 6a3804538da9a3328a76e61202f4e5057ca6a464 (diff) | |
| download | fpc-79b8ee4d4f4cdcdde47bec108d696dab9cd58905.tar.gz | |
* use stdout only
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@11957 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fpmkunit')
| -rw-r--r-- | packages/fpmkunit/src/fpmkunit.pp | 7 |
1 files changed, 1 insertions, 6 deletions
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; |