diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-07-24 22:04:44 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-07-24 22:04:44 +0000 |
commit | f64471ee99e8b5d7ee21af0a51b5901fa597dbcf (patch) | |
tree | 9c8e0a46a2a495bd2c988e89c16facd3ee142a02 /perl-install/log.pm | |
parent | fb77cab84379b7c286ad5f336d850d3b6db3e833 (diff) | |
download | drakx-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.tar drakx-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.tar.gz drakx-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.tar.bz2 drakx-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.tar.xz drakx-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.zip |
when testing, log on STDERR
Diffstat (limited to 'perl-install/log.pm')
-rw-r--r-- | perl-install/log.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/log.pm b/perl-install/log.pm index 649ed30a0..ac024819f 100644 --- a/perl-install/log.pm +++ b/perl-install/log.pm @@ -19,7 +19,9 @@ sub F() { *LOG } sub l { $logOpen or openLog(); - if ($::isStandalone) { + if ($::testing) { + print STDERR @_, "\n"; + } elsif ($::isStandalone) { c::syslog(c::LOG_WARNING(), join("", @_)); } elsif ($::isInstall) { print LOG "* ", @_, "\n"; |