diff options
| -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"; |