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 | |
| parent | fb77cab84379b7c286ad5f336d850d3b6db3e833 (diff) | |
| download | drakx-backup-do-not-use-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.tar drakx-backup-do-not-use-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.tar.gz drakx-backup-do-not-use-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.tar.bz2 drakx-backup-do-not-use-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.tar.xz drakx-backup-do-not-use-f64471ee99e8b5d7ee21af0a51b5901fa597dbcf.zip | |
when testing, log on STDERR
Diffstat (limited to 'perl-install')
| -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"; |